[[Rcpp::export]]
| 364 | |
| 365 | // [[Rcpp::export]] |
| 366 | NumericVector runit_sapply( NumericVector xx ){ |
| 367 | NumericVector res = sapply( xx, square<double>() ); |
| 368 | return res ; |
| 369 | } |
| 370 | |
| 371 | // [[Rcpp::export]] |
| 372 | NumericVector runit_sapply_rawfun( NumericVector xx){ |