[[Rcpp::export]]
| 86 | |
| 87 | // [[Rcpp::export]] |
| 88 | std::vector<std::string> asStdVectorString( SEXP x){ |
| 89 | std::vector<std::string> iv = as< std::vector<std::string> >( x ); |
| 90 | for (size_t i=0; i<iv.size(); i++) { |
| 91 | iv[i] = iv[i] + iv[i]; |
| 92 | } |
| 93 | return iv ; |
| 94 | } |
| 95 | |
| 96 | // [[Rcpp::export]] |
| 97 | std::set<int> stdsetint(){ |