[[Rcpp::export]]
| 344 | |
| 345 | // [[Rcpp::export]] |
| 346 | NumericVector runit_Range(){ |
| 347 | NumericVector xx(8) ; |
| 348 | xx[ Range(0,3) ] = exp( seq_len(4) ) ; |
| 349 | xx[ Range(4,7) ] = exp( - seq_len(4) ) ; |
| 350 | return xx ; |
| 351 | } |
| 352 | |
| 353 | // [[Rcpp::export]] |
| 354 | IntegerVector runit_range_plus(int start, int end, int n) { |