[[Rcpp::export]]
| 47 | |
| 48 | // [[Rcpp::export]] |
| 49 | IntegerVector function_unarycall(List x){ |
| 50 | Function len( "length" ) ; |
| 51 | IntegerVector output( x.size() ) ; |
| 52 | std::transform( |
| 53 | x.begin(), x.end(), |
| 54 | output.begin(), |
| 55 | unary_call<IntegerVector,int>(len) |
| 56 | ) ; |
| 57 | return output ; |
| 58 | } |
| 59 | |
| 60 | // [[Rcpp::export]] |
| 61 | List function_binarycall(List list,IntegerVector vec){ |