[[Rcpp::export]]
| 529 | |
| 530 | // [[Rcpp::export]] |
| 531 | NumericVector runit_rpois(double a) { |
| 532 | NumericVector o(5); |
| 533 | for(int i = 0; i < o.size(); i++) { |
| 534 | o[i] = R::rpois(a); |
| 535 | } |
| 536 | return o; |
| 537 | } |
| 538 | |
| 539 | // [[Rcpp::export]] |
| 540 | NumericVector runit_rpois_sugar(double a) { |