[[Rcpp::export]]
| 463 | |
| 464 | // [[Rcpp::export]] |
| 465 | NumericVector runit_rhyper(double a, double b, double c) { |
| 466 | NumericVector o(5); |
| 467 | for(int i = 0; i < o.size(); i++) { |
| 468 | o[i] = R::rhyper(a, b, c); |
| 469 | } |
| 470 | return o; |
| 471 | } |
| 472 | |
| 473 | // [[Rcpp::export]] |
| 474 | NumericVector runit_rhyper_sugar(double a, double b, double c) { |