RcppEigen 稀疏矩阵插入操作给出无效类“dgCMatrix”错误

我正在尝试加快使用 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

正如您从标准输出中看到的，eigen 正在做正确的事情。但是，生成的稀疏矩阵对象格式错误。事实上，查看它的槽会发现 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();