1*bf2c3715SXin Li // This file is part of Eigen, a lightweight C++ template library
2*bf2c3715SXin Li // for linear algebra.
3*bf2c3715SXin Li //
4*bf2c3715SXin Li // Copyright (C) 2008-2011 Gael Guennebaud <[email protected]>
5*bf2c3715SXin Li //
6*bf2c3715SXin Li // This Source Code Form is subject to the terms of the Mozilla
7*bf2c3715SXin Li // Public License v. 2.0. If a copy of the MPL was not distributed
8*bf2c3715SXin Li // with this file, You can obtain one at http://mozilla.org/MPL/2.0/.
9*bf2c3715SXin Li
10*bf2c3715SXin Li #include "sparse.h"
11*bf2c3715SXin Li
sparse_vector(int rows,int cols)12*bf2c3715SXin Li template<typename Scalar,typename StorageIndex> void sparse_vector(int rows, int cols)
13*bf2c3715SXin Li {
14*bf2c3715SXin Li double densityMat = (std::max)(8./(rows*cols), 0.01);
15*bf2c3715SXin Li double densityVec = (std::max)(8./(rows), 0.1);
16*bf2c3715SXin Li typedef Matrix<Scalar,Dynamic,Dynamic> DenseMatrix;
17*bf2c3715SXin Li typedef Matrix<Scalar,Dynamic,1> DenseVector;
18*bf2c3715SXin Li typedef SparseVector<Scalar,0,StorageIndex> SparseVectorType;
19*bf2c3715SXin Li typedef SparseMatrix<Scalar,0,StorageIndex> SparseMatrixType;
20*bf2c3715SXin Li Scalar eps = 1e-6;
21*bf2c3715SXin Li
22*bf2c3715SXin Li SparseMatrixType m1(rows,rows);
23*bf2c3715SXin Li SparseVectorType v1(rows), v2(rows), v3(rows);
24*bf2c3715SXin Li DenseMatrix refM1 = DenseMatrix::Zero(rows, rows);
25*bf2c3715SXin Li DenseVector refV1 = DenseVector::Random(rows),
26*bf2c3715SXin Li refV2 = DenseVector::Random(rows),
27*bf2c3715SXin Li refV3 = DenseVector::Random(rows);
28*bf2c3715SXin Li
29*bf2c3715SXin Li std::vector<int> zerocoords, nonzerocoords;
30*bf2c3715SXin Li initSparse<Scalar>(densityVec, refV1, v1, &zerocoords, &nonzerocoords);
31*bf2c3715SXin Li initSparse<Scalar>(densityMat, refM1, m1);
32*bf2c3715SXin Li
33*bf2c3715SXin Li initSparse<Scalar>(densityVec, refV2, v2);
34*bf2c3715SXin Li initSparse<Scalar>(densityVec, refV3, v3);
35*bf2c3715SXin Li
36*bf2c3715SXin Li Scalar s1 = internal::random<Scalar>();
37*bf2c3715SXin Li
38*bf2c3715SXin Li // test coeff and coeffRef
39*bf2c3715SXin Li for (unsigned int i=0; i<zerocoords.size(); ++i)
40*bf2c3715SXin Li {
41*bf2c3715SXin Li VERIFY_IS_MUCH_SMALLER_THAN( v1.coeff(zerocoords[i]), eps );
42*bf2c3715SXin Li //VERIFY_RAISES_ASSERT( v1.coeffRef(zerocoords[i]) = 5 );
43*bf2c3715SXin Li }
44*bf2c3715SXin Li {
45*bf2c3715SXin Li VERIFY(int(nonzerocoords.size()) == v1.nonZeros());
46*bf2c3715SXin Li int j=0;
47*bf2c3715SXin Li for (typename SparseVectorType::InnerIterator it(v1); it; ++it,++j)
48*bf2c3715SXin Li {
49*bf2c3715SXin Li VERIFY(nonzerocoords[j]==it.index());
50*bf2c3715SXin Li VERIFY(it.value()==v1.coeff(it.index()));
51*bf2c3715SXin Li VERIFY(it.value()==refV1.coeff(it.index()));
52*bf2c3715SXin Li }
53*bf2c3715SXin Li }
54*bf2c3715SXin Li VERIFY_IS_APPROX(v1, refV1);
55*bf2c3715SXin Li
56*bf2c3715SXin Li // test coeffRef with reallocation
57*bf2c3715SXin Li {
58*bf2c3715SXin Li SparseVectorType v4(rows);
59*bf2c3715SXin Li DenseVector v5 = DenseVector::Zero(rows);
60*bf2c3715SXin Li for(int k=0; k<rows; ++k)
61*bf2c3715SXin Li {
62*bf2c3715SXin Li int i = internal::random<int>(0,rows-1);
63*bf2c3715SXin Li Scalar v = internal::random<Scalar>();
64*bf2c3715SXin Li v4.coeffRef(i) += v;
65*bf2c3715SXin Li v5.coeffRef(i) += v;
66*bf2c3715SXin Li }
67*bf2c3715SXin Li VERIFY_IS_APPROX(v4,v5);
68*bf2c3715SXin Li }
69*bf2c3715SXin Li
70*bf2c3715SXin Li v1.coeffRef(nonzerocoords[0]) = Scalar(5);
71*bf2c3715SXin Li refV1.coeffRef(nonzerocoords[0]) = Scalar(5);
72*bf2c3715SXin Li VERIFY_IS_APPROX(v1, refV1);
73*bf2c3715SXin Li
74*bf2c3715SXin Li VERIFY_IS_APPROX(v1+v2, refV1+refV2);
75*bf2c3715SXin Li VERIFY_IS_APPROX(v1+v2+v3, refV1+refV2+refV3);
76*bf2c3715SXin Li
77*bf2c3715SXin Li VERIFY_IS_APPROX(v1*s1-v2, refV1*s1-refV2);
78*bf2c3715SXin Li
79*bf2c3715SXin Li VERIFY_IS_APPROX(v1*=s1, refV1*=s1);
80*bf2c3715SXin Li VERIFY_IS_APPROX(v1/=s1, refV1/=s1);
81*bf2c3715SXin Li
82*bf2c3715SXin Li VERIFY_IS_APPROX(v1+=v2, refV1+=refV2);
83*bf2c3715SXin Li VERIFY_IS_APPROX(v1-=v2, refV1-=refV2);
84*bf2c3715SXin Li
85*bf2c3715SXin Li VERIFY_IS_APPROX(v1.dot(v2), refV1.dot(refV2));
86*bf2c3715SXin Li VERIFY_IS_APPROX(v1.dot(refV2), refV1.dot(refV2));
87*bf2c3715SXin Li
88*bf2c3715SXin Li VERIFY_IS_APPROX(m1*v2, refM1*refV2);
89*bf2c3715SXin Li VERIFY_IS_APPROX(v1.dot(m1*v2), refV1.dot(refM1*refV2));
90*bf2c3715SXin Li {
91*bf2c3715SXin Li int i = internal::random<int>(0,rows-1);
92*bf2c3715SXin Li VERIFY_IS_APPROX(v1.dot(m1.col(i)), refV1.dot(refM1.col(i)));
93*bf2c3715SXin Li }
94*bf2c3715SXin Li
95*bf2c3715SXin Li
96*bf2c3715SXin Li VERIFY_IS_APPROX(v1.squaredNorm(), refV1.squaredNorm());
97*bf2c3715SXin Li
98*bf2c3715SXin Li VERIFY_IS_APPROX(v1.blueNorm(), refV1.blueNorm());
99*bf2c3715SXin Li
100*bf2c3715SXin Li // test aliasing
101*bf2c3715SXin Li VERIFY_IS_APPROX((v1 = -v1), (refV1 = -refV1));
102*bf2c3715SXin Li VERIFY_IS_APPROX((v1 = v1.transpose()), (refV1 = refV1.transpose().eval()));
103*bf2c3715SXin Li VERIFY_IS_APPROX((v1 += -v1), (refV1 += -refV1));
104*bf2c3715SXin Li
105*bf2c3715SXin Li // sparse matrix to sparse vector
106*bf2c3715SXin Li SparseMatrixType mv1;
107*bf2c3715SXin Li VERIFY_IS_APPROX((mv1=v1),v1);
108*bf2c3715SXin Li VERIFY_IS_APPROX(mv1,(v1=mv1));
109*bf2c3715SXin Li VERIFY_IS_APPROX(mv1,(v1=mv1.transpose()));
110*bf2c3715SXin Li
111*bf2c3715SXin Li // check copy to dense vector with transpose
112*bf2c3715SXin Li refV3.resize(0);
113*bf2c3715SXin Li VERIFY_IS_APPROX(refV3 = v1.transpose(),v1.toDense());
114*bf2c3715SXin Li VERIFY_IS_APPROX(DenseVector(v1),v1.toDense());
115*bf2c3715SXin Li
116*bf2c3715SXin Li // test conservative resize
117*bf2c3715SXin Li {
118*bf2c3715SXin Li std::vector<StorageIndex> inc;
119*bf2c3715SXin Li if(rows > 3)
120*bf2c3715SXin Li inc.push_back(-3);
121*bf2c3715SXin Li inc.push_back(0);
122*bf2c3715SXin Li inc.push_back(3);
123*bf2c3715SXin Li inc.push_back(1);
124*bf2c3715SXin Li inc.push_back(10);
125*bf2c3715SXin Li
126*bf2c3715SXin Li for(std::size_t i = 0; i< inc.size(); i++) {
127*bf2c3715SXin Li StorageIndex incRows = inc[i];
128*bf2c3715SXin Li SparseVectorType vec1(rows);
129*bf2c3715SXin Li DenseVector refVec1 = DenseVector::Zero(rows);
130*bf2c3715SXin Li initSparse<Scalar>(densityVec, refVec1, vec1);
131*bf2c3715SXin Li
132*bf2c3715SXin Li vec1.conservativeResize(rows+incRows);
133*bf2c3715SXin Li refVec1.conservativeResize(rows+incRows);
134*bf2c3715SXin Li if (incRows > 0) refVec1.tail(incRows).setZero();
135*bf2c3715SXin Li
136*bf2c3715SXin Li VERIFY_IS_APPROX(vec1, refVec1);
137*bf2c3715SXin Li
138*bf2c3715SXin Li // Insert new values
139*bf2c3715SXin Li if (incRows > 0)
140*bf2c3715SXin Li vec1.insert(vec1.rows()-1) = refVec1(refVec1.rows()-1) = 1;
141*bf2c3715SXin Li
142*bf2c3715SXin Li VERIFY_IS_APPROX(vec1, refVec1);
143*bf2c3715SXin Li }
144*bf2c3715SXin Li }
145*bf2c3715SXin Li
146*bf2c3715SXin Li }
147*bf2c3715SXin Li
EIGEN_DECLARE_TEST(sparse_vector)148*bf2c3715SXin Li EIGEN_DECLARE_TEST(sparse_vector)
149*bf2c3715SXin Li {
150*bf2c3715SXin Li for(int i = 0; i < g_repeat; i++) {
151*bf2c3715SXin Li int r = Eigen::internal::random<int>(1,500), c = Eigen::internal::random<int>(1,500);
152*bf2c3715SXin Li if(Eigen::internal::random<int>(0,4) == 0) {
153*bf2c3715SXin Li r = c; // check square matrices in 25% of tries
154*bf2c3715SXin Li }
155*bf2c3715SXin Li EIGEN_UNUSED_VARIABLE(r+c);
156*bf2c3715SXin Li
157*bf2c3715SXin Li CALL_SUBTEST_1(( sparse_vector<double,int>(8, 8) ));
158*bf2c3715SXin Li CALL_SUBTEST_2(( sparse_vector<std::complex<double>, int>(r, c) ));
159*bf2c3715SXin Li CALL_SUBTEST_1(( sparse_vector<double,long int>(r, c) ));
160*bf2c3715SXin Li CALL_SUBTEST_1(( sparse_vector<double,short>(r, c) ));
161*bf2c3715SXin Li }
162*bf2c3715SXin Li }
163*bf2c3715SXin Li
164