phynexis-deps/armadillo-code
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
Files
8ab2cf95897fbead004e1bfbd41b62efdef7bf38
armadillo-code/tests2/spsubview.cpp
T

1565 lines
40 KiB
C++
Raw Blame History

// SPDX-License-Identifier: Apache-2.0
//
// Copyright 2011-2017 Ryan Curtin (http://www.ratml.org/)
// Copyright 2017 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"
using namespace arma;
TEST_CASE("sp_subview_tests")
{
Mat<double> ref(4,4);
ref.eye(4,4);
SpMat<double> X(4,4);
X.eye(4,4);
/*
* [[1,0,0,0] [[2,0,0,0]
* [0,1,0,0] -> [0,2,0,0]
* [0,0,1,0] [0,0,2,0]
* [0,0,0,1]] [0,0,0,1]]
*/
ref.submat(0, 0, 2, 2) *= 2;
X.submat(0, 0, 2, 2) *= 2;
for (uword i = 0; i < 4; i++)
{
for (uword j = 0; j < 4; j++)
{
REQUIRE( (double) ref(i, j) == Approx((double) X(i, j)) );
}
}
/*
* [[2,0,0,0] [[2,0,0,0]
* [0,2,0,0] -> [0,1,0,0]
* [0,0,2,0] [0,0,1,0]
* [0,0,0,1]] [0,0,0,.5]]
*/
ref.submat(1, 1, 3, 3) /= 2;
X.submat(1, 1, 3, 3) /= 2;
for (uword i = 0; i < 4; i++)
{
for (uword j = 0; j < 4; j++)
{
REQUIRE( (double) ref(i, j) == Approx((double) X(i, j)) );
}
}
span s(1, 2);
ref.submat(s, s) += 10;
X.submat(s, s) += 10;
for (uword i = 0; i < 4; i++)
{
for (uword j = 0; j < 4; j++)
{
REQUIRE( (double) ref(i, j) == Approx((double) X(i, j)) );
}
}
}
TEST_CASE("sp_subview_const_test")
{
Mat<double> ref(4, 4);
ref.eye(4, 4);
SpMat<double> X(4, 4);
X.eye(4, 4);
const SpSubview<double> subX = X.submat(span(0, 2), span::all);
/*
X.print("x");
for (size_t i = 0; i < 3; ++i)
{
for (size_t j = 0; j < 4; ++j)
{
printf("%f ", subX(i, j));
}
printf("\n");
}
*/
}
TEST_CASE("sp_subview_multiplication_test")
{
// Ensure matrix multiplication with subviews works correctly.
SpMat<double> a(2, 5);
SpMat<double> b(5, 2);
a(1, 3) = 1;
a(0, 0) = 2;
a(1, 2) = 1.5;
b(4, 1) = 3;
b(3, 0) = 2;
b(1, 0) = 1;
b(0, 0) = 0.6;
b *= a;
REQUIRE( b.n_cols == 5 );
REQUIRE( b.n_rows == 5 );
REQUIRE( b.n_elem == 25 );
REQUIRE( b.n_nonzero == 5 );
REQUIRE( (double) b(0, 0) == Approx(1.2) );
REQUIRE( (double) b(0, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(0, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(0, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(0, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 0) == Approx(2.0) );
REQUIRE( (double) b(1, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 0) == Approx(4.0) );
REQUIRE( (double) b(3, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(4, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(4, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(4, 2) == Approx(4.5) );
REQUIRE( (double) b(4, 3) == Approx(3.0) );
REQUIRE( (double) b(4, 4) == Approx(0.0).margin(0.001) );
}
TEST_CASE("sp_subview_multiplication_test_2")
{
// Ensure matrix multiplication with subviews works correctly.
SpMat<double> a(4, 5);
SpMat<double> b(5, 2);
a(2, 3) = 1;
a(3, 1) = 1.4;
a(0, 0) = 2;
a(1, 0) = 2;
a(2, 2) = 1.5;
b(4, 1) = 3;
b(3, 0) = 2;
b(1, 0) = 1;
b(0, 0) = 0.6;
b *= a.rows(1, 2);
REQUIRE( b.n_cols == 5 );
REQUIRE( b.n_rows == 5 );
REQUIRE( b.n_elem == 25 );
REQUIRE( b.n_nonzero == 5 );
REQUIRE( (double) b(0, 0) == Approx(1.2) );
REQUIRE( (double) b(0, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(0, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(0, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(0, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 0) == Approx(2.0) );
REQUIRE( (double) b(1, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(1, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(2, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 0) == Approx(4.0) );
REQUIRE( (double) b(3, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(3, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(4, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(4, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) b(4, 2) == Approx(4.5) );
REQUIRE( (double) b(4, 3) == Approx(3.0) );
REQUIRE( (double) b(4, 4) == Approx(0.0).margin(0.001) );
}
TEST_CASE("sp_subview_unary_operators_test")
{
SpMat<int> a(3, 3);
SpMat<int> b(5, 5);
a(0, 0) = 1;
a(1, 2) = 4;
a(2, 2) = 5;
b(2, 3) = 1;
b(3, 2) = 2;
b(3, 4) = -4;
b(4, 4) = 5;
SpMat<int> c = a + b.submat(2, 2, 4, 4);
REQUIRE( c.n_nonzero == 4 );
REQUIRE( (double) c(0, 0) == 1 );
REQUIRE( (double) c(1, 0) == 2 );
REQUIRE( (double) c(2, 0) == 0 );
REQUIRE( (double) c(0, 1) == 1 );
REQUIRE( (double) c(1, 1) == 0 );
REQUIRE( (double) c(2, 1) == 0 );
REQUIRE( (double) c(0, 2) == 0 );
REQUIRE( (double) c(1, 2) == 0 );
REQUIRE( (double) c(2, 2) == 10 );
c = a - b.submat(2, 2, 4, 4);
REQUIRE( c.n_nonzero == 4 );
REQUIRE( (double) c(0, 0) == 1 );
REQUIRE( (double) c(1, 0) == -2 );
REQUIRE( (double) c(2, 0) == 0 );
REQUIRE( (double) c(0, 1) == -1 );
REQUIRE( (double) c(1, 1) == 0 );
REQUIRE( (double) c(2, 1) == 0 );
REQUIRE( (double) c(0, 2) == 0 );
REQUIRE( (double) c(1, 2) == 8 );
REQUIRE( (double) c(2, 2) == 0 );
c = a % b.submat(2, 2, 4, 4);
REQUIRE( c.n_nonzero == 2 );
REQUIRE( (double) c(0, 0) == 0 );
REQUIRE( (double) c(1, 0) == 0 );
REQUIRE( (double) c(2, 0) == 0 );
REQUIRE( (double) c(0, 1) == 0 );
REQUIRE( (double) c(1, 1) == 0 );
REQUIRE( (double) c(2, 1) == 0 );
REQUIRE( (double) c(0, 2) == 0 );
REQUIRE( (double) c(1, 2) == -16 );
REQUIRE( (double) c(2, 2) == 25 );
a(0, 0) = 4;
b(2, 2) = 2;
/*
c = a / b.submat(2, 2, 4, 4);
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(0, 0) == 2 );
REQUIRE( (double) c(1, 0) == 0 );
REQUIRE( (double) c(2, 0) == 0 );
REQUIRE( (double) c(0, 1) == 0 );
REQUIRE( (double) c(1, 1) == 0 );
REQUIRE( (double) c(2, 1) == 0 );
REQUIRE( (double) c(0, 2) == 0 );
REQUIRE( (double) c(1, 2) == -1 );
REQUIRE( (double) c(2, 2) == 1 );
*/
}
TEST_CASE("sp_subview_mat_operator_tests")
{
SpMat<double> a(6, 10);
a(2, 2) = 2.0;
a(3, 4) = 3.5;
a(4, 3) = -2.0;
a(4, 4) = 4.5;
a(5, 1) = 3.2;
a(0, 1) = 1.3;
a(1, 1) = -4.0;
a(5, 3) = 5.3;
mat b(3, 3);
b.fill(2.0);
mat c(b);
c += a.submat(2, 2, 4, 4);
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 0) == Approx(2.0) );
REQUIRE( (double) c(2, 0) == Approx(2.0) );
REQUIRE( (double) c(0, 1) == Approx(2.0) );
REQUIRE( (double) c(1, 1) == Approx(2.0) );
REQUIRE( (double) c(2, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(0, 2) == Approx(2.0) );
REQUIRE( (double) c(1, 2) == Approx(5.5) );
REQUIRE( (double) c(2, 2) == Approx(6.5) );
c = b + a.submat(2, 2, 4, 4);
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 0) == Approx(2.0) );
REQUIRE( (double) c(2, 0) == Approx(2.0) );
REQUIRE( (double) c(0, 1) == Approx(2.0) );
REQUIRE( (double) c(1, 1) == Approx(2.0) );
REQUIRE( (double) c(2, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(0, 2) == Approx(2.0) );
REQUIRE( (double) c(1, 2) == Approx(5.5) );
REQUIRE( (double) c(2, 2) == Approx(6.5) );
c = b;
c -= a.submat(2, 2, 4, 4);
REQUIRE( (double) c(0, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(1, 0) == Approx(2.0) );
REQUIRE( (double) c(2, 0) == Approx(2.0) );
REQUIRE( (double) c(0, 1) == Approx(2.0) );
REQUIRE( (double) c(1, 1) == Approx(2.0) );
REQUIRE( (double) c(2, 1) == Approx(4.0) );
REQUIRE( (double) c(0, 2) == Approx(2.0) );
REQUIRE( (double) c(1, 2) == Approx(-1.5) );
REQUIRE( (double) c(2, 2) == Approx(-2.5) );
c = b - a.submat(2, 2, 4, 4);
REQUIRE( (double) c(0, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(1, 0) == Approx(2.0) );
REQUIRE( (double) c(2, 0) == Approx(2.0) );
REQUIRE( (double) c(0, 1) == Approx(2.0) );
REQUIRE( (double) c(1, 1) == Approx(2.0) );
REQUIRE( (double) c(2, 1) == Approx(4.0) );
REQUIRE( (double) c(0, 2) == Approx(2.0) );
REQUIRE( (double) c(1, 2) == Approx(-1.5) );
REQUIRE( (double) c(2, 2) == Approx(-2.5) );
c = b;
c *= a.submat(2, 2, 4, 4);
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 0) == Approx(4.0) );
REQUIRE( (double) c(2, 0) == Approx(4.0) );
REQUIRE( (double) c(0, 1) == Approx(-4.0) );
REQUIRE( (double) c(1, 1) == Approx(-4.0) );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(0, 2) == Approx(16.0) );
REQUIRE( (double) c(1, 2) == Approx(16.0) );
REQUIRE( (double) c(2, 2) == Approx(16.0) );
mat e = b * a.submat(2, 2, 4, 4);
REQUIRE( (double) e(0, 0) == Approx(4.0) );
REQUIRE( (double) e(1, 0) == Approx(4.0) );
REQUIRE( (double) e(2, 0) == Approx(4.0) );
REQUIRE( (double) e(0, 1) == Approx(-4.0) );
REQUIRE( (double) e(1, 1) == Approx(-4.0) );
REQUIRE( (double) e(2, 1) == Approx(-4.0) );
REQUIRE( (double) e(0, 2) == Approx(16.0) );
REQUIRE( (double) e(1, 2) == Approx(16.0) );
REQUIRE( (double) e(2, 2) == Approx(16.0) );
c = b;
c %= a.submat(2, 2, 4, 4);
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(2, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(0, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(1, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(0, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(1, 2) == Approx(7.0) );
REQUIRE( (double) c(2, 2) == Approx(9.0) );
SpMat<double> d = b % a.submat(2, 2, 4, 4);
REQUIRE( d.n_nonzero == 4 );
REQUIRE( (double) d(0, 0) == Approx(4.0) );
REQUIRE( (double) d(2, 1) == Approx(-4.0) );
REQUIRE( (double) d(1, 2) == Approx(7.0) );
REQUIRE( (double) d(2, 2) == Approx(9.0) );
c = b;
c /= a.submat(2, 2, 4, 4);
REQUIRE( c(0, 0) == Approx(1.0) );
REQUIRE( std::isinf(c(1, 0)) );
REQUIRE( std::isinf(c(2, 0)) );
REQUIRE( std::isinf(c(0, 1)) );
REQUIRE( std::isinf(c(1, 1)) );
REQUIRE( c(2, 1) == Approx(-1.0) );
REQUIRE( std::isinf(c(0, 2)) );
REQUIRE( c(1, 2) == Approx(2.0 / 3.5) );
REQUIRE( c(2, 2) == Approx(2.0 / 4.5) );
}
TEST_CASE("sp_subview_base_test")
{
SpMat<double> a(6, 10);
a(2, 2) = 2.0;
a(3, 4) = 3.5;
a(4, 3) = -2.0;
a(4, 4) = 4.5;
a(5, 1) = 3.2;
a(0, 1) = 1.3;
a(1, 1) = -4.0;
a(5, 3) = 5.3;
mat b(3, 3);
b.fill(2.0);
SpMat<double> c = a;
c.submat(2, 2, 4, 4) = b;
REQUIRE( c.n_nonzero == 13 );
REQUIRE( (double) c(2, 2) == Approx(2.0) );
REQUIRE( (double) c(3, 2) == Approx(2.0) );
REQUIRE( (double) c(4, 2) == Approx(2.0) );
REQUIRE( (double) c(2, 3) == Approx(2.0) );
REQUIRE( (double) c(3, 3) == Approx(2.0) );
REQUIRE( (double) c(4, 3) == Approx(2.0) );
REQUIRE( (double) c(2, 4) == Approx(2.0) );
REQUIRE( (double) c(3, 4) == Approx(2.0) );
REQUIRE( (double) c(4, 4) == Approx(2.0) );
c = a;
c.submat(2, 2, 4, 4) += b;
REQUIRE( c.n_nonzero == 12 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(3, 2) == Approx(2.0) );
REQUIRE( (double) c(4, 2) == Approx(2.0) );
REQUIRE( (double) c(2, 3) == Approx(2.0) );
REQUIRE( (double) c(3, 3) == Approx(2.0) );
REQUIRE( (double) c(4, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(2, 4) == Approx(2.0) );
REQUIRE( (double) c(3, 4) == Approx(5.5) );
REQUIRE( (double) c(4, 4) == Approx(6.5) );
Mat<double> d = a.submat(2, 2, 4, 4) + b;
c = a.submat(2, 2, 4, 4) + b;
REQUIRE( c.n_nonzero == 8 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 0) == Approx(2.0) );
REQUIRE( (double) c(2, 0) == Approx(2.0) );
REQUIRE( (double) c(0, 1) == Approx(2.0) );
REQUIRE( (double) c(1, 1) == Approx(2.0) );
REQUIRE( (double) c(2, 1) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(0, 2) == Approx(2.0) );
REQUIRE( (double) c(1, 2) == Approx(5.5) );
REQUIRE( (double) c(2, 2) == Approx(6.5) );
c = a;
c.submat(2, 2, 4, 4) -= b;
REQUIRE( c.n_nonzero == 12 );
REQUIRE( (double) c(2, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 2) == Approx(-2.0) );
REQUIRE( (double) c(4, 2) == Approx(-2.0) );
REQUIRE( (double) c(2, 3) == Approx(-2.0) );
REQUIRE( (double) c(3, 3) == Approx(-2.0) );
REQUIRE( (double) c(4, 3) == Approx(-4.0) );
REQUIRE( (double) c(2, 4) == Approx(-2.0) );
REQUIRE( (double) c(3, 4) == Approx(1.5) );
REQUIRE( (double) c(4, 4) == Approx(2.5) );
c = a.submat(2, 2, 4, 4) - b;
REQUIRE( c.n_nonzero == 8 );
REQUIRE( (double) c(0, 0) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(1, 0) == Approx(-2.0) );
REQUIRE( (double) c(2, 0) == Approx(-2.0) );
REQUIRE( (double) c(0, 1) == Approx(-2.0) );
REQUIRE( (double) c(1, 1) == Approx(-2.0) );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(0, 2) == Approx(-2.0) );
REQUIRE( (double) c(1, 2) == Approx(1.5) );
REQUIRE( (double) c(2, 2) == Approx(2.5) );
c = a;
c.submat(2, 2, 4, 4) *= b;
REQUIRE( c.n_nonzero == 13 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(3, 2) == Approx(7.0) );
REQUIRE( (double) c(4, 2) == Approx(5.0) );
REQUIRE( (double) c(2, 3) == Approx(4.0) );
REQUIRE( (double) c(3, 3) == Approx(7.0) );
REQUIRE( (double) c(4, 3) == Approx(5.0) );
REQUIRE( (double) c(2, 4) == Approx(4.0) );
REQUIRE( (double) c(3, 4) == Approx(7.0) );
REQUIRE( (double) c(4, 4) == Approx(5.0) );
c = a.submat(2, 2, 4, 4) * b;
REQUIRE( c.n_nonzero == 9 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 0) == Approx(7.0) );
REQUIRE( (double) c(2, 0) == Approx(5.0) );
REQUIRE( (double) c(0, 1) == Approx(4.0) );
REQUIRE( (double) c(1, 1) == Approx(7.0) );
REQUIRE( (double) c(2, 1) == Approx(5.0) );
REQUIRE( (double) c(0, 2) == Approx(4.0) );
REQUIRE( (double) c(1, 2) == Approx(7.0) );
REQUIRE( (double) c(2, 2) == Approx(5.0) );
c = a.submat(2, 2, 4, 4) % b;
REQUIRE( c.n_nonzero == 4 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(1, 2) == Approx(7.0) );
REQUIRE( (double) c(2, 2) == Approx(9.0) );
c = a;
c.submat(2, 2, 4, 4) %= b;
REQUIRE( c.n_nonzero == 8 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(4, 3) == Approx(-4.0) );
REQUIRE( (double) c(3, 4) == Approx(7.0) );
REQUIRE( (double) c(4, 4) == Approx(9.0) );
c = a.submat(2, 2, 4, 4) / b;
REQUIRE( c.n_nonzero == 4 );
REQUIRE( (double) c(0, 0) == Approx(1.0) );
REQUIRE( (double) c(2, 1) == Approx(-1.0) );
REQUIRE( (double) c(1, 2) == Approx(3.5 / 2.0) );
REQUIRE( (double) c(2, 2) == Approx(4.5 / 2.0) );
c = a;
c.submat(2, 2, 4, 4) /= b;
REQUIRE( c.n_nonzero == 8 );
REQUIRE( (double) c(2, 2) == Approx(1.0) );
REQUIRE( (double) c(4, 3) == Approx(-1.0) );
REQUIRE( (double) c(3, 4) == Approx(3.5 / 2.0) );
REQUIRE( (double) c(4, 4) == Approx(4.5 / 2.0) );
}
TEST_CASE("sp_subview_sp_mat_test")
{
SpMat<double> a(6, 10);
a(2, 2) = 2.0;
a(3, 4) = 3.5;
a(4, 3) = -2.0;
a(4, 4) = 4.5;
a(5, 1) = 3.2;
a(0, 1) = 1.3;
a(1, 1) = -4.0;
a(5, 3) = 5.3;
SpMat<double> b(3, 3);
b(0, 0) = 2.0;
b(1, 2) = 1.5;
b(2, 1) = 2.0;
SpMat<double> c = a;
c.submat(2, 2, 4, 4) = b;
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(2.0) );
REQUIRE( (double) c(3, 4) == Approx(1.5) );
REQUIRE( (double) c(4, 3) == Approx(2.0) );
c = a;
c.submat(2, 2, 4, 4) += b;
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(3, 4) == Approx(5.0) );
REQUIRE( (double) c(4, 4) == Approx(4.5) );
c = a.submat(2, 2, 4, 4) + b;
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 2) == Approx(5.0) );
REQUIRE( (double) c(2, 2) == Approx(4.5) );
c = a;
c.submat(2, 2, 4, 4) -= b;
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(4, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(2, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(4, 3) == Approx(-4.0) );
REQUIRE( (double) c(2, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 4) == Approx(2.0) );
REQUIRE( (double) c(4, 4) == Approx(4.5) );
c = a.submat(2, 2, 4, 4) - b;
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(1, 2) == Approx(2.0) );
REQUIRE( (double) c(2, 2) == Approx(4.5) );
c = a;
c.submat(2, 2, 4, 4) *= b;
REQUIRE( c.n_nonzero == 8 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(3, 3) == Approx(7.0) );
REQUIRE( (double) c(4, 3) == Approx(9.0) );
REQUIRE( (double) c(4, 4) == Approx(-3.0) );
c = a.submat(2, 2, 4, 4) * b;
REQUIRE( c.n_nonzero == 4 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 1) == Approx(7.0) );
REQUIRE( (double) c(2, 1) == Approx(9.0) );
REQUIRE( (double) c(2, 2) == Approx(-3.0) );
c = a.submat(2, 2, 4, 4) % b;
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(1, 2) == Approx(5.25) );
REQUIRE( (double) c(2, 2) == Approx(0.0).margin(0.001) );
c = a;
c.submat(2, 2, 4, 4) %= b;
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(4, 3) == Approx(-4.0) );
REQUIRE( (double) c(3, 4) == Approx(5.25) );
REQUIRE( (double) c(4, 4) == Approx(0.0).margin(0.001) );
// c = a.submat(2, 2, 4, 4) / b;
// REQUIRE( c.n_nonzero == 9 );
// REQUIRE( (double) c(0, 0) == Approx(1.0) );
// REQUIRE( (double) c(1, 0) != (double) c(1, 0) );
// REQUIRE( (double) c(2, 0) != (double) c(2, 0) );
// REQUIRE( (double) c(0, 1) != (double) c(0, 1) );
// REQUIRE( (double) c(1, 1) != (double) c(1, 1) );
// REQUIRE( (double) c(2, 1) == Approx(-1.0) );
// REQUIRE( (double) c(0, 2) != (double) c(0, 2) );
// REQUIRE( (double) c(1, 2) == Approx((3.5 / 1.5)) );
// REQUIRE( std::isinf((double) c(2, 2)) );
c = a;
c.submat(2, 2, 4, 4) /= b;
REQUIRE( c.n_nonzero == 13 );
REQUIRE( (double) c(2, 2) == Approx(1.0) );
REQUIRE( (double) c(3, 2) != (double) c(3, 2));
REQUIRE( (double) c(4, 2) != (double) c(4, 2));
REQUIRE( (double) c(2, 3) != (double) c(2, 3));
REQUIRE( (double) c(3, 3) != (double) c(3, 3));
REQUIRE( (double) c(4, 3) == Approx(-1.0) );
REQUIRE( (double) c(2, 4) != (double) c(2, 4) );
REQUIRE( (double) c(3, 4) == Approx((3.5 / 1.5)) );
REQUIRE( std::isinf((double) c(4, 4)) );
}
TEST_CASE("sp_subview_sp_subview_tests")
{
SpMat<double> a(6, 10);
a(2, 2) = 2.0;
a(3, 4) = 3.5;
a(4, 3) = -2.0;
a(4, 4) = 4.5;
a(5, 1) = 3.2;
a(0, 1) = 1.3;
a(1, 1) = -4.0;
a(5, 3) = 5.3;
SpMat<double> b(5, 5);
b(0, 0) = 1.0;
b(0, 1) = 1.0;
b(0, 2) = 1.0;
b(0, 3) = 1.0;
b(0, 4) = 1.0;
b(1, 0) = 1.0;
b(2, 0) = 1.0;
b(3, 0) = 1.0;
b(4, 0) = 1.0;
b(4, 1) = 1.0;
b(4, 2) = 1.0;
b(4, 3) = 1.0;
b(4, 4) = 1.0;
b(3, 4) = 1.0;
b(2, 4) = 1.0;
b(1, 4) = 1.0;
b(1, 1) = 2.0;
b(2, 3) = 1.5;
b(3, 2) = 2.0;
SpMat<double> c = a;
c.submat(2, 2, 4, 4) = b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(2.0) );
REQUIRE( (double) c(3, 4) == Approx(1.5) );
REQUIRE( (double) c(4, 3) == Approx(2.0) );
c = a;
c.submat(2, 2, 4, 4) += b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(3, 4) == Approx(5.0) );
REQUIRE( (double) c(4, 4) == Approx(4.5) );
c = a.submat(2, 2, 4, 4) + b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 2) == Approx(5.0) );
REQUIRE( (double) c(2, 2) == Approx(4.5) );
c = a;
c.submat(2, 2, 4, 4) -= b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(4, 2) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(2, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 3) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(4, 3) == Approx(-4.0) );
REQUIRE( (double) c(2, 4) == Approx(0.0).margin(0.001) );
REQUIRE( (double) c(3, 4) == Approx(2.0) );
REQUIRE( (double) c(4, 4) == Approx(4.5) );
c = a.submat(2, 2, 4, 4) - b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(1, 2) == Approx(2.0) );
REQUIRE( (double) c(2, 2) == Approx(4.5) );
c = a;
c.submat(2, 2, 4, 4) *= b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 8 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(3, 3) == Approx(7.0) );
REQUIRE( (double) c(4, 3) == Approx(9.0) );
REQUIRE( (double) c(4, 4) == Approx(-3.0) );
c = a.submat(2, 2, 4, 4) * b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 4 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(1, 1) == Approx(7.0) );
REQUIRE( (double) c(2, 1) == Approx(9.0) );
REQUIRE( (double) c(2, 2) == Approx(-3.0) );
c = a.submat(2, 2, 4, 4) % b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 3 );
REQUIRE( (double) c(0, 0) == Approx(4.0) );
REQUIRE( (double) c(2, 1) == Approx(-4.0) );
REQUIRE( (double) c(1, 2) == Approx(5.25) );
REQUIRE( (double) c(2, 2) == Approx(0.0).margin(0.001) );
c = a;
c.submat(2, 2, 4, 4) %= b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 7 );
REQUIRE( (double) c(2, 2) == Approx(4.0) );
REQUIRE( (double) c(4, 3) == Approx(-4.0) );
REQUIRE( (double) c(3, 4) == Approx(5.25) );
REQUIRE( (double) c(4, 4) == Approx(0.0).margin(0.001) );
// c = a.submat(2, 2, 4, 4) / b.submat(1, 1, 3, 3);
// REQUIRE( c.n_nonzero == 9 );
// REQUIRE( (double) c(0, 0) == Approx(1.0) );
// REQUIRE( (double) c(1, 0) != (double) c(1, 0) );
// REQUIRE( (double) c(2, 0) != (double) c(2, 0) );
// REQUIRE( (double) c(0, 1) != (double) c(0, 1) );
// REQUIRE( (double) c(1, 1) != (double) c(1, 1) );
// REQUIRE( (double) c(2, 1) == Approx(-1.0) );
// REQUIRE( (double) c(0, 2) != (double) c(0, 2) );
// REQUIRE( (double) c(1, 2) == Approx((3.5 / 1.5)) );
// REQUIRE( std::isinf((double) c(2, 2)) );
c = a;
c.submat(2, 2, 4, 4) /= b.submat(1, 1, 3, 3);
REQUIRE( c.n_nonzero == 13 );
REQUIRE( (double) c(2, 2) == Approx(1.0) );
REQUIRE( (double) c(3, 2) != (double) c(3, 2) );
REQUIRE( (double) c(4, 2) != (double) c(4, 2) );
REQUIRE( (double) c(2, 3) != (double) c(2, 3) );
REQUIRE( (double) c(3, 3) != (double) c(3, 3) );
REQUIRE( (double) c(4, 3) == Approx(-1.0) );
REQUIRE( (double) c(2, 4) != (double) c(2, 4) );
REQUIRE( (double) c(3, 4) == Approx((3.5 / 1.5)) );
REQUIRE( std::isinf((double) c(4, 4)) );
}
TEST_CASE("sp_subview_iterators_test")
{
SpMat<double> b(5, 5);
b(0, 0) = 1.0;
b(0, 1) = 1.0;
b(0, 2) = 1.0;
b(0, 3) = 1.0;
b(0, 4) = 1.0;
b(1, 0) = 1.0;
b(2, 0) = 1.0;
b(3, 0) = 1.0;
b(4, 0) = 1.0;
b(4, 1) = 1.0;
b(4, 2) = 1.0;
b(4, 3) = 1.0;
b(4, 4) = 1.0;
b(3, 4) = 1.0;
b(2, 4) = 1.0;
b(1, 4) = 1.0;
b(1, 1) = 2.0;
b(2, 3) = 1.5;
b(3, 2) = 2.0;
// [[1.0 1.0 1.0 1.0 1.0]
// [1.0 2.0 0.0 0.0 1.0]
// [1.0 0.0 0.0 1.5 1.0]
// [1.0 0.0 2.0 0.0 1.0]
// [1.0 1.0 1.0 1.0 1.0]]
SpSubview<double> s = b.submat(1, 1, 3, 3);
SpSubview<double>::iterator it = s.begin();
REQUIRE( it.pos() == 0 );
REQUIRE( it.skip_pos == 6 );
REQUIRE( it.row() == 0 );
REQUIRE( it.col() == 0 );
REQUIRE( (double) (*it) == Approx(2.0) );
++it;
REQUIRE( it.pos() == 1 );
REQUIRE( it.skip_pos == 8 );
REQUIRE( it.row() == 2 );
REQUIRE( it.col() == 1 );
REQUIRE( (double) (*it) == Approx(2.0) );
++it;
REQUIRE( it.pos() == 2 );
REQUIRE( it.skip_pos == 10 );
REQUIRE( it.row() == 1 );
REQUIRE( it.col() == 2 );
REQUIRE( (double) (*it) == Approx(1.5) );
*it = 4.3;
REQUIRE( (double) (*it) == Approx(4.3) );
++it;
REQUIRE( it.pos() == s.n_nonzero );
--it;
REQUIRE( it.pos() == 2 );
REQUIRE( it.skip_pos == 10 );
REQUIRE( it.row() == 1 );
REQUIRE( it.col() == 2 );
REQUIRE( (double) (*it) == Approx(4.3) );
--it;
REQUIRE( it.pos() == 1 );
REQUIRE( it.skip_pos == 8 );
REQUIRE( it.row() == 2 );
REQUIRE( it.col() == 1 );
REQUIRE( (double) (*it) == Approx(2.0) );
--it;
REQUIRE( it.pos() == 0 );
REQUIRE( it.skip_pos == 6 );
REQUIRE( it.row() == 0 );
REQUIRE( it.col() == 0 );
REQUIRE( (double) (*it) == Approx(2.0) );
SpMat<double> c(5, 5);
c(1, 1) = 2.0;
c(2, 3) = 1.5;
c(3, 2) = 2.0;
SpSubview<double> ss = c.submat(1, 1, 3, 3);
SpSubview<double>::iterator sit = ss.begin();
REQUIRE( sit.pos() == 0 );
REQUIRE( sit.skip_pos == 0 );
REQUIRE( sit.row() == 0 );
REQUIRE( sit.col() == 0 );
REQUIRE( (double) (*sit) == Approx(2.0) );
++sit;
REQUIRE( sit.pos() == 1 );
REQUIRE( sit.skip_pos == 0 );
REQUIRE( sit.row() == 2 );
REQUIRE( sit.col() == 1 );
REQUIRE( (double) (*sit) == Approx(2.0) );
++sit;
REQUIRE( sit.pos() == 2 );
REQUIRE( sit.skip_pos == 0 );
REQUIRE( sit.row() == 1 );
REQUIRE( sit.col() == 2 );
REQUIRE( (double) (*sit) == Approx(1.5) );
*sit = 4.2;
REQUIRE( (double) (*sit) == Approx(4.2) );
++sit;
REQUIRE( sit.pos() == ss.n_nonzero );
--sit;
REQUIRE( sit.pos() == 2 );
REQUIRE( sit.skip_pos == 0 );
REQUIRE( sit.row() == 1 );
REQUIRE( sit.col() == 2 );
REQUIRE( (double) (*sit) == Approx(4.2) );
--sit;
REQUIRE( sit.pos() == 1 );
REQUIRE( sit.skip_pos == 0 );
REQUIRE( sit.row() == 2 );
REQUIRE( sit.col() == 1 );
REQUIRE( (double) (*sit) == Approx(2.0) );
--sit;
REQUIRE( sit.pos() == 0 );
REQUIRE( sit.skip_pos == 0 );
REQUIRE( sit.row() == 0 );
REQUIRE( sit.col() == 0 );
REQUIRE( (double) (*sit) == Approx(2.0) );
}
TEST_CASE("sp_subview_row_iterators_test")
{
SpMat<double> b(5, 5);
b(0, 0) = 1.0;
b(0, 1) = 1.0;
b(0, 2) = 1.0;
b(0, 3) = 1.0;
b(0, 4) = 1.0;
b(1, 0) = 1.0;
b(2, 0) = 1.0;
b(3, 0) = 1.0;
b(4, 0) = 1.0;
b(4, 1) = 1.0;
b(4, 2) = 1.0;
b(4, 3) = 1.0;
b(4, 4) = 1.0;
b(3, 4) = 1.0;
b(2, 4) = 1.0;
b(1, 4) = 1.0;
b(1, 1) = 2.0;
b(2, 3) = 1.5;
b(3, 2) = 2.0;
// [[1.0 1.0 1.0 1.0 1.0]
// [1.0 2.0 0.0 0.0 1.0]
// [1.0 0.0 0.0 1.5 1.0]
// [1.0 0.0 2.0 0.0 1.0]
// [1.0 1.0 1.0 1.0 1.0]]
SpSubview<double> s = b.submat(1, 1, 3, 3);
SpSubview<double>::row_iterator it = s.begin_row();
REQUIRE( it.pos() == 0 );
REQUIRE( it.row() == 0 );
REQUIRE( it.col() == 0 );
REQUIRE( it.actual_pos == 6 );
REQUIRE( (double) (*it) == Approx(2.0) );
++it;
REQUIRE( it.pos() == 1 );
REQUIRE( it.row() == 1 );
REQUIRE( it.col() == 2 );
REQUIRE( it.actual_pos == 12 );
REQUIRE( (double) (*it) == Approx(1.5) );
++it;
REQUIRE( it.pos() == 2 );
REQUIRE( it.row() == 2 );
REQUIRE( it.col() == 1 );
REQUIRE( it.actual_pos == 9 );
REQUIRE( (double) (*it) == Approx(2.0) );
++it;
REQUIRE( it.pos() == s.n_nonzero );
--it;
REQUIRE( it.pos() == 2 );
REQUIRE( it.row() == 2 );
REQUIRE( it.col() == 1 );
REQUIRE( it.actual_pos == 9 );
REQUIRE( (double) (*it) == Approx(2.0) );
(*it) = 4.0;
REQUIRE( (double) (*it) == Approx(4.0) );
--it;
REQUIRE( it.pos() == 1 );
REQUIRE( it.row() == 1 );
REQUIRE( it.col() == 2 );
REQUIRE( it.actual_pos == 12 );
REQUIRE( (double) (*it) == Approx(1.5) );
--it;
REQUIRE( it.pos() == 0 );
REQUIRE( it.row() == 0 );
REQUIRE( it.col() == 0 );
REQUIRE( it.actual_pos == 6 );
REQUIRE( (double) (*it) == Approx(2.0) );
// now a different matrix
SpMat<double> c(5, 5);
c(1, 1) = 2.0;
c(2, 3) = 1.5;
c(3, 2) = 2.0;
SpSubview<double> ss = c.submat(0, 0, 3, 3);
SpSubview<double>::row_iterator sit = ss.begin_row();
REQUIRE( sit.pos() == 0 );
REQUIRE( sit.row() == 1 );
REQUIRE( sit.col() == 1 );
REQUIRE( (double) (*sit) == Approx(2.0) );
++sit;
REQUIRE( sit.pos() == 1 );
REQUIRE( sit.row() == 2 );
REQUIRE( sit.col() == 3 );
REQUIRE( (double) (*sit) == Approx(1.5) );
++sit;
REQUIRE( sit.pos() == 2 );
REQUIRE( sit.row() == 3 );
REQUIRE( sit.col() == 2 );
REQUIRE( (double) (*sit) == Approx(2.0) );
++sit;
REQUIRE( sit.pos() == ss.n_nonzero );
--sit;
REQUIRE( sit.pos() == 2 );
REQUIRE( sit.row() == 3 );
REQUIRE( sit.col() == 2 );
REQUIRE( (double) (*sit) == Approx(2.0) );
(*sit) = 4.0;
REQUIRE( (double) (*sit) == Approx(4.0) );
--sit;
REQUIRE( sit.pos() == 1 );
REQUIRE( sit.row() == 2 );
REQUIRE( sit.col() == 3 );
REQUIRE( (double) (*sit) == Approx(1.5) );
--sit;
REQUIRE( sit.pos() == 0 );
REQUIRE( sit.row() == 1 );
REQUIRE( sit.col() == 1 );
REQUIRE( (double) (*sit) == Approx(2.0) );
}
TEST_CASE("sp_subview_sp_base_add_subtract_modulo")
{
SpMat<double> m;
m.sprandu(100, 100, 0.1);
SpMat<double> n;
n.sprandu(50, 50, 0.1);
Mat<double> x(m);
Mat<double> y(n);
m.submat(25, 25, 74, 74) += n;
x.submat(25, 25, 74, 74) += y;
for (uword c = 0; c < 100; ++c)
{
for (uword r = 0; r < 100; ++r)
{
REQUIRE( (double) m(r, c) == Approx(x(r, c)) );
}
}
m.sprandu(100, 100, 0.1);
n.sprandu(50, 50, 0.1);
x = m;
y = n;
m.submat(25, 25, 74, 74) -= n;
x.submat(25, 25, 74, 74) -= y;
for (uword c = 0; c < 100; ++c)
{
for (uword r = 0; r < 100; ++r)
{
REQUIRE( (double) m(r, c) == Approx(x(r, c)) );
}
}
m.sprandu(100, 100, 0.1);
n.sprandu(50, 50, 0.1);
x = m;
y = n;
m.submat(25, 25, 74, 74) %= n;
x.submat(25, 25, 74, 74) %= y;
for( uword c = 0; c < 100; ++c)
{
for( uword r = 0; r < 100; ++r)
{
REQUIRE( (double) m(r, c) == Approx(x(r, c)) );
}
}
}
TEST_CASE("sp_subview_hadamard")
{
SpMat<double> x;
x.sprandu(100, 100, 0.1);
Mat<double> d(x);
SpMat<double> y;
y.sprandu(200, 200, 0.1);
Mat<double> dy(y);
x %= y.submat(50, 50, 149, 149);
d %= dy.submat(50, 50, 149, 149);
for (uword c = 0; c < 100; ++c)
{
for (uword r = 0; r < 100; ++r)
{
REQUIRE( (double) x(r, c) == Approx(d(r, c)) );
}
}
}
TEST_CASE("sp_subview_subviews_test")
{
SpMat<double> m(20, 20);
m.sprandu(20, 20, 0.3);
// Get a subview.
SpSubview<double> s = m.submat(1, 1, 10, 10); // 10x10
const SpSubview<double> c = m.submat(1, 1, 10, 10);
SpSubview<double> t = s.row(1);
const SpSubview<double> d = c.row(1);
REQUIRE( t.n_rows == 1 );
REQUIRE( t.n_cols == 10 );
REQUIRE( d.n_rows == 1 );
REQUIRE( d.n_cols == 10 );
REQUIRE( t.aux_row1 == 2 );
REQUIRE( t.aux_col1 == 1 );
for (uword i = 0; i < 10; ++i)
{
REQUIRE( (double) t(i) == (double) m(2, i + 1) );
REQUIRE( d(i) == (double) m(2, i + 1) );
}
SpSubview<double> t1 = s.col(2);
const SpSubview<double> d1 = c.col(2);
REQUIRE( t1.n_rows == 10 );
REQUIRE( t1.n_cols == 1 );
REQUIRE( d1.n_rows == 10 );
REQUIRE( d1.n_cols == 1 );
for (uword i = 0; i < 10; ++i)
{
REQUIRE( (double) t1(i) == (double) m(i + 1, 3) );
REQUIRE( d1(i) == (double) m(i + 1, 3) );
}
SpSubview<double> t2 = s.rows(3, 5);
const SpSubview<double> d2 = c.rows(3, 5);
REQUIRE( t2.n_rows == 3 );
REQUIRE( t2.n_cols == 10 );
REQUIRE( d2.n_rows == 3 );
REQUIRE( d2.n_cols == 10 );
for (uword j = 0; j < 3; ++j)
{
for (uword i = 0; i < 10; ++i)
{
REQUIRE( (double) t2(j, i) == (double) m(4 + j, i + 1) );
REQUIRE( d2(j, i) == (double) m(4 + j, i + 1) );
}
}
SpSubview<double> t3 = s.cols(4, 6);
const SpSubview<double> d3 = c.cols(4, 6);
REQUIRE( t3.n_rows == 10 );
REQUIRE( t3.n_cols == 3 );
REQUIRE( d3.n_rows == 10 );
REQUIRE( d3.n_cols == 3 );
for (uword j = 0; j < 3; ++j)
{
for (uword i = 0; i < 10; ++i)
{
REQUIRE( (double) t3(i, j) == (double) m(i + 1, 5 + j) );
REQUIRE( d3(i, j) == (double) m(i + 1, 5 + j) );
}
}
SpSubview<double> t4 = s.submat(1, 1, 6, 6);
const SpSubview<double> d4 = c.submat(1, 1, 6, 6);
REQUIRE( t4.n_rows == 6 );
REQUIRE( t4.n_cols == 6 );
REQUIRE( d4.n_rows == 6 );
REQUIRE( d4.n_cols == 6 );
for (uword j = 0; j < 6; ++j)
{
for (uword i = 0; i < 6; ++i)
{
REQUIRE( (double) t4(i, j) == (double) m(i + 2, 2 + j) );
REQUIRE( d4(i, j) == (double) m(i + 2, 2 + j) );
}
}
SpSubview<double> t5 = s.submat(span(2, 8), span(2, 5));
const SpSubview<double> d5 = c.submat(span(2, 8), span(2, 5));
REQUIRE( t5.n_rows == 7 );
REQUIRE( t5.n_cols == 4 );
REQUIRE( d5.n_rows == 7 );
REQUIRE( d5.n_cols == 4 );
for (uword j = 0; j < 4; ++j)
{
for (uword i = 0; i < 7; ++i)
{
REQUIRE( (double) t5(i, j) == (double) m(i + 3, 3 + j) );
REQUIRE( d5(i, j) == (double) m(i + 3, 3 + j) );
}
}
SpSubview<double> t6 = s(4, span(1, 5));
const SpSubview<double> d6 = c(4, span(1, 5));
REQUIRE( t6.n_rows == 1 );
REQUIRE( t6.n_cols == 5 );
REQUIRE( d6.n_rows == 1 );
REQUIRE( d6.n_cols == 5 );
for (uword i = 0; i < 5; ++i)
{
REQUIRE( (double) t6(i) == (double) m(5, 2 + i) );
REQUIRE( d6(i) == (double) m(5, 2 + i) );
}
SpSubview<double> t7 = s(span(1, 5), 4);
const SpSubview<double> d7 = c(span(1, 5), 4);
REQUIRE( t7.n_rows == 5 );
REQUIRE( t7.n_cols == 1 );
REQUIRE( d7.n_rows == 5 );
REQUIRE( d7.n_cols == 1 );
for (uword i = 0; i < 5; ++i)
{
REQUIRE( (double) t7(i) == (double) m(2 + i, 5) );
REQUIRE( d7(i) == (double) m(2 + i, 5) );
}
SpSubview<double> t8 = s(span(1, 9), span(7, 8));
const SpSubview<double> d8 = c(span(1, 9), span(7, 8));
REQUIRE( t8.n_rows == 9 );
REQUIRE( t8.n_cols == 2 );
REQUIRE( d8.n_rows == 9 );
REQUIRE( d8.n_cols == 2 );
for (uword j = 0; j < 2; ++j)
{
for (uword i = 0; i < 9; ++i)
{
REQUIRE( (double) t8(i, j) == (double) m(i + 2, 8 + j) );
REQUIRE( d8(i, j) == (double) m(i + 2, 8 + j) );
}
}
}
TEST_CASE("sp_subview_assignment_sp_base")
{
mat d(51, 51);
d.fill(7.0); // Why not?
mat dd(d);
sp_mat e;
e.sprandu(50, 50, 0.3);
mat ed(e); // Dense copy.
d.submat(0, 0, 49, 49) = e;
dd.submat(0, 0, 49, 49) = ed;
for (uword i = 0; i < d.n_elem; ++i)
{
REQUIRE( d(i) == Approx(dd(i)) );
}
}
TEST_CASE("sp_subview_addition_sp_base")
{
mat d(51, 51);
d.fill(7.0); // Why not?
mat dd(d);
sp_mat e;
e.sprandu(50, 50, 0.3);
mat ed(e); // Dense copy.
d.submat(0, 0, 49, 49) += e;
dd.submat(0, 0, 49, 49) += ed;
for (uword i = 0; i < d.n_elem; ++i)
{
REQUIRE( d(i) == Approx(dd(i)) );
}
}
TEST_CASE("sp_subview_subtraction_sp_base")
{
mat d(51, 51);
d.fill(7.0); // Why not?
mat dd(d);
sp_mat e;
e.sprandu(50, 50, 0.3);
mat ed(e); // Dense copy.
d.submat(0, 0, 49, 49) -= e;
dd.submat(0, 0, 49, 49) -= ed;
for (uword i = 0; i < d.n_elem; ++i)
{
REQUIRE( d(i) == Approx(dd(i)) );
}
}
TEST_CASE("sp_subview_schur_sp_base")
{
mat d(51, 51);
d.fill(7.0); // Why not?
mat dd(d);
sp_mat e;
e.sprandu(50, 50, 0.3);
mat ed(e); // Dense copy.
d.submat(0, 0, 49, 49) %= e;
dd.submat(0, 0, 49, 49) %= ed;
for (uword i = 0; i < d.n_elem; ++i)
{
REQUIRE( d(i) == Approx(dd(i)) );
}
}
TEST_CASE("sp_subview_division_sp_base")
{
mat d(51, 51);
d.fill(7.0); // Why not?
mat dd(d);
sp_mat e;
e.sprandu(50, 50, 0.3);
mat ed(e); // Dense copy.
d.submat(0, 0, 49, 49) /= e;
dd.submat(0, 0, 49, 49) /= ed;
for (uword i = 0; i < d.n_elem; ++i)
{
if (std::isinf(d(i)))
REQUIRE( std::isinf(dd(i)) );
else
REQUIRE( d(i) == Approx(dd(i)) );
}
}
TEST_CASE("sp_subview_row_iterator_constructor")
{
// Create a row iterator with an exact position.
Mat<double> tmp =
{ { 1.1, 1.2, 1.3, 1.4, 1.5 },
{ 2.1, 5.5, 0.0, 0.0, 3.1 },
{ 2.2, 0.0, 0.0, 6.5, 3.2 },
{ 2.3, 0.0, 7.5, 0.0, 3.3 },
{ 2.4, 4.2, 4.3, 4.4, 3.4 } };
SpMat<double> X(tmp);
SpSubview<double> sv = X.submat(1, 1, 3, 3);
// Now create an iterator to an exact position.
SpSubview<double>::const_row_iterator cri(sv, 0, 1);
// This should end up at (1, 2) with value 6.5.
REQUIRE( cri.row() == 1 );
REQUIRE( cri.col() == 2 );
REQUIRE( (*cri) == Approx(6.5) );
cri = SpSubview<double>::const_row_iterator(sv, 0, 0);
// This should end up at (0, 0) with value 5.5.
REQUIRE( cri.row() == 0 );
REQUIRE( cri.col() == 0 );
REQUIRE( (*cri) == Approx(5.5) );
cri = SpSubview<double>::const_row_iterator(sv, 2, 1);
// This should end up at (2, 1) with value 7.5.
REQUIRE( cri.row() == 2 );
REQUIRE( cri.col() == 1 );
REQUIRE( (*cri) == Approx(7.5) );
}
TEST_CASE("sp_subview_row_iterator_test_1")
{
Mat<double> tmp =
{ { 1.1, 1.2, 1.3, 1.4, 1.5 },
{ 2.1, 5.5, 0.0, 0.0, 3.1 },
{ 2.2, 0.0, 0.0, 6.5, 3.2 },
{ 2.3, 0.0, 7.5, 0.0, 3.3 },
{ 2.4, 4.2, 4.3, 4.4, 3.4 } };
SpMat<double> X(tmp);
SpSubview<double> sv = X.submat(1, 1, 3, 3);
SpSubview<double>::row_iterator it = sv.begin_row();
SpSubview<double>::row_iterator it2 = sv.begin_row();
++it;
--it;
REQUIRE( it.row() == it2.row() );
REQUIRE( it.col() == it2.col() );
REQUIRE( (*it) == Approx(*it2) );
REQUIRE( it.pos() == it2.pos() );
}
TEST_CASE("sp_subview_row_iterator_test_2")
{
// Make sure the loop terminates.
Mat<double> tmp =
{ { 1.1, 1.2, 1.3, 1.4, 1.5 },
{ 2.1, 5.5, 0.0, 0.0, 3.1 },
{ 2.2, 0.0, 0.0, 6.5, 3.2 },
{ 2.3, 0.0, 7.5, 0.0, 3.3 },
{ 2.4, 4.2, 4.3, 4.4, 3.4 } };
SpMat<double> X(tmp);
SpSubview<double> sv = X.submat(1, 1, 3, 3);
SpSubview<double>::row_iterator it = sv.end_row(sv.n_rows - 1); // points to past-the-end
SpSubview<double>::row_iterator it_end = sv.begin_row();
do {
--it;
} while(it != it_end);
REQUIRE( true );
}
TEST_CASE("sp_subview_n_nonzero_test")
{
sp_mat x;
x.sprandu(100, 100, 0.3);
sp_vec y = x.col(0);
REQUIRE( y.n_nonzero == x.col(0).n_nonzero );
sp_mat z = x.cols(0, 5);
REQUIRE( z.n_nonzero == x.cols(0, 5).n_nonzero );
z = x.cols(11, 74);
REQUIRE( z.n_nonzero == x.cols(11, 74).n_nonzero );
z = x.submat(12, 14, 77, 17);
REQUIRE( z.n_nonzero == x.submat(12, 14, 77, 17).n_nonzero );
}
Reference in New Issue View Git Blame Copy Permalink