On 31 May 2013 at 12:00, Søren Højsgaard wrote:
| Dear all;
|
| In c++ I want to do:
| x<-c(2,4,6,8,10)
| i<- c(2,3,5)
| x[i]
|
| I do:
|
| cat("
| #include
|
| using namespace Rcpp;
| using namespace arma;
|
| // [[Rcpp::export]]
| NumericVector select(NumericVector vec_, NumericVector idx_
Dear all;
In c++ I want to do:
x<-c(2,4,6,8,10)
i<- c(2,3,5)
x[i]
I do:
cat("
#include
using namespace Rcpp;
using namespace arma;
// [[Rcpp::export]]
NumericVector select(NumericVector vec_, NumericVector idx_){
arma::vec vv = Rcpp::as(vec_);
arma::uvec ii = Rcpp::as(idx_);
arma::vec
