在C ++中使用稀疏矩陣的RCPP

Question

從RCCP開始不知所措。 如何使用代碼中定義的稀疏矩陣（索引，讀取和分配值），就像使用“標准”矩陣一樣？

library('Matrix')
library(Rcpp)
library(inline)

r <- matrix(seq(1,9,1),ncol=3,nrow=3)
i <- Matrix(0, nrow = nrow(r) * ncol(r), ncol = nrow(r)*ncol(r), sparse=TRUE)
fx <- cxxfunction( signature( x_ = "matrix" ,y_="dsCMatrix"), '
    NumericMatrix x(x_) ;
    int nr = x.nrow(), nc = x.ncol() ;
    for (int i = 0; i < nr; i++) {
             for (int j = 1; j < nc; j++) {
             x(i,j) = 1;
         }
    }
    return wrap( x ) ;
', plugin = "Rcpp" )

fx( r,i)

Answer 1

你最好的選擇可能是

• Rcpp Gallery上有關稀疏矩陣的帖子，以及
• rcpp-devel郵件列表。