Function asStdVectorDouble

inst/tinytest/cpp/RObject.cpp:60–66

[[Rcpp::export]]

// [[Rcpp::export]]
std::vector<double> asStdVectorDouble(SEXP x){
    std::vector<double> iv = as< std::vector<double> >( x );
    for (size_t i=0; i<iv.size(); i++) {
        	iv[i] = 2*iv[i];
    }
	return iv ;
}

// [[Rcpp::export]]
std::vector<Rbyte> asStdVectorRaw( SEXP x){