[[Rcpp::export]]
| 298 | |
| 299 | // [[Rcpp::export]] |
| 300 | NumericVector runit_rt(double a) { |
| 301 | NumericVector o(5); |
| 302 | for(int i = 0; i < o.size(); i++) { |
| 303 | o[i] = R::rt(a); |
| 304 | } |
| 305 | return o; |
| 306 | } |
| 307 | |
| 308 | // [[Rcpp::export]] |
| 309 | NumericVector runit_rt_sugar(double a) { |