我试图加快使用C++的速度来快速构建一些稀疏矩阵供R使用。但是,我似乎无法使用insert方法来更改Eigen中稀疏矩阵的单个元素并获得正确的R对象。 dgCMatrix类。下面是一个简单的示例。
C++代码是:
#include <RcppEigen.h>
// [[Rcpp::depends(RcppEigen)]]
using Eigen::SparseMatrix; // sparse matrix
// [[Rcpp::export]]
SparseMatrix<double> SimpleSparseMatrix(int n) {
SparseMatrix<double> new_mat(n, n);
new_mat.insert(0, 0) = 2;
Rcpp::Rcout << new_mat << std::endl;
return new_mat;
}
所得的R为:
> SimpleSparseMatrix(2)
2 0
0 0
2 x 2 sparse Matrix of class "dgCMatrix"
Error in validObject(x) :
invalid class “dgCMatrix” object: last element of slot p must match length of slots i and x
从标准输出中可以看出,本征正在做正确的事情。但是,所得的稀疏矩阵对象格式错误。实际上,查看其插槽会显示p的无效值:
> foo <- SimpleSparseMatrix(2)
2 0
0 0
> str(foo)
Formal class 'dgCMatrix' [package "Matrix"] with 6 slots
..@ i : int 0
..@ p : int [1:3] 0 2 4
..@ Dim : int [1:2] 2 2
..@ Dimnames:List of 2
.. ..$ : NULL
.. ..$ : NULL
..@ x : num 2
..@ factors : list()
任何想法可能出什么问题吗?
最佳答案
在insert
语句之后,添加以下语句:
new_mat.makeCompressed();