[[Rcpp::export]]
| 80 | |
| 81 | // [[Rcpp::export]] |
| 82 | List runit_lang_unarycall(IntegerVector x){ |
| 83 | Language call( "seq", Named("from", 10 ), Named("to", 0 ) ) ; |
| 84 | List output( x.size() ) ; |
| 85 | std::transform( |
| 86 | x.begin(), x.end(), |
| 87 | output.begin(), |
| 88 | unary_call<int>(call) |
| 89 | ) ; |
| 90 | return output ; |
| 91 | } |
| 92 | |
| 93 | // [[Rcpp::export]] |
| 94 | List runit_lang_unarycallindex(IntegerVector x){ |