[Rcpp-devel] as cube

Hi,

I would like to do something like this:

src.cube <- "
     arma::cube a = as<arma::cube>(aR);
     return wrap(a);
"
fx <- cxxfunction(signature(aR="array"), src.cube, plugin="RcppArmadillo")
fx(array(1:27, c(3,3,3)))

But it fails.

Can someone suggest a good alternative? I tried to create
the cube on the C++ side and use .fill() to fill it with a
NumericVector, but this did not work either.

Thanks,
Richard