pass arma::cube object as function argument gives error about rcpparmadillo HOT 8 CLOSED

Pull requests would be welcome.

from rcpparmadillo.

Hi Dirk, that's fair. I'm far from being an expert programmer but found the following code that solves the problem. However, I don't know how easy would be integrating it in your package:

#include <RcppArmadillo.h>
// [[Rcpp::depends(RcppArmadillo)]]

// [[Rcpp::export]]
arma::cube array2cube( SEXP myArray ) {

Rcpp::NumericVector vecArray(myArray);
Rcpp::IntegerVector arrayDims = vecArray.attr("dim");

arma::cube cubeArray(vecArray.begin(), arrayDims[0], arrayDims[1], arrayDims[2], false);

return(cubeArray);  

}

Many thanks in any case for providing the Rcpp package.

from rcpparmadillo.

This has been added in #64.

from rcpparmadillo.

Great!

George G. Vega Yon (from mobile)
+1 626 381 8171
http://www.its.caltech.edu/~gvegayon
On Dec 1, 2015 4:10 AM, "Dirk Eddelbuettel" [email protected]
wrote:

This has been added in #64
#64.

—
Reply to this email directly or view it on GitHub
#42 (comment)
.

from rcpparmadillo.

Our thanks to @nathan-russell 😃

from rcpparmadillo.

Thanks a lot.
El 1 dic. 2015 1:10 p. m., "Dirk Eddelbuettel" [email protected]
escribió:

This has been added in #64
#64.

—
Reply to this email directly or view it on GitHub
#42 (comment)
.

from rcpparmadillo.

For completeness:

 R> library(Rcpp)
 R> cppFunction("arma::cube doubleCube(arma::cube cb) { return 2*cb; }", 
 +                        depends="RcppArmadillo")
R> doubleCube(array(1:8, dim=c(2,2,2)))
 , , 1

      [,1] [,2]
 [1,]    2    6
 [2,]    4    8

 , , 2

      [,1] [,2]
 [1,]   10   14
 [2,]   12   16

 R> 

Thanks again @nathan-russell !

from rcpparmadillo.

@eddelbuettel More than happy to help where I'm able to 👍

from rcpparmadillo.