[[Rcpp::export]]
| 322 | |
| 323 | // [[Rcpp::export]] |
| 324 | List runit_pmin_one( NumericVector xx ){ |
| 325 | return List::create( |
| 326 | pmin( xx, 5), |
| 327 | pmin( 5, xx) |
| 328 | ) ; |
| 329 | } |
| 330 | |
| 331 | // [[Rcpp::export]] |
| 332 | NumericVector runit_pmax( NumericVector xx, NumericVector yy ){ |