Files
armadillo-code/tests2/fn_find_unique.cpp
T
2025-07-07 04:00:20 +00:00

115 lines
2.7 KiB
C++

// SPDX-License-Identifier: Apache-2.0
//
// Copyright 2015 Conrad Sanderson (http://conradsanderson.id.au)
// Copyright 2015 National ICT Australia (NICTA)
//
// Licensed under the Apache License, Version 2.0 (the "License");
// you may not use this file except in compliance with the License.
// You may obtain a copy of the License at
// http://www.apache.org/licenses/LICENSE-2.0
//
// Unless required by applicable law or agreed to in writing, software
// distributed under the License is distributed on an "AS IS" BASIS,
// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
// See the License for the specific language governing permissions and
// limitations under the License.
// ------------------------------------------------------------------------
#include <armadillo>
#include "catch.hpp"
#include "utils.hpp"
using namespace arma;
TEST_CASE("fn_find_unique_1", "[find]")
{
mat A =
{
{ 1, 3, 5, 6, 7 },
{ 2, 4, 5, 7, 8 },
{ 3, 5, 5, 6, 9 },
};
uvec indices = find_unique(A);
uvec indices2 = { 0, 1, 2, 4, 5, 9, 10, 13, 14 };
REQUIRE( indices.n_elem == indices2.n_elem );
bool same = true;
for(uword i=0; i < indices.n_elem; ++i)
{
if(indices(i) != indices2(i)) { same = false; break; }
}
REQUIRE( same == true );
vec unique_elem = { 1, 2, 3, 4, 5, 6, 7, 8, 9 };
REQUIRE( accu(abs( A.elem(indices) - unique_elem )) == Approx(0.0).margin(0.001) );
// REQUIRE_THROWS( );
}
TEST_CASE("fn_find_unique_2", "[find]")
{
cx_mat A =
{
{ cx_double(1,-1), cx_double(3, 2), cx_double(5, 2), cx_double(6, 1), cx_double(7,-1) },
{ cx_double(2, 1), cx_double(4, 4), cx_double(5, 2), cx_double(7,-1), cx_double(8, 1) },
{ cx_double(3, 2), cx_double(5, 1), cx_double(5, 3), cx_double(6, 1), cx_double(9,-9) }
};
uvec indices = find_unique(A);
uvec indices2 = { 0, 1, 2, 4, 5, 6, 8, 9, 10, 13, 14 };
REQUIRE( indices.n_elem == indices2.n_elem );
bool same = true;
for(uword i=0; i < indices.n_elem; ++i)
{
if(indices(i) != indices2(i)) { same = false; break; }
}
REQUIRE( same == true );
cx_vec unique_elem =
{
cx_double(1,-1),
cx_double(2, 1),
cx_double(3, 2),
cx_double(4, 4),
cx_double(5, 1),
cx_double(5, 2),
cx_double(5, 3),
cx_double(6, 1),
cx_double(7,-1),
cx_double(8, 1),
cx_double(9,-9)
};
REQUIRE( accu(abs( A.elem(indices) - unique_elem )) == Approx(0.0).margin(0.001) );
// REQUIRE_THROWS( );
}
TEMPLATE_TEST_CASE("fn_find_unique_fp", "[find]", TEST_FLOAT_TYPES)
{
typedef TestType eT;
Col<eT> X({ eT(0), eT(1), eT(1), eT(2), eT(1), eT(2) });
uvec r = find_unique(X);
REQUIRE( all( r == uvec({ 0, 1, 3 }) ) );
}