Using Rcpp