[[Rcpp::export]]
| 213 | |
| 214 | // [[Rcpp::export]] |
| 215 | NumericVector runit_rchisq(double a) { |
| 216 | NumericVector o(5); |
| 217 | for (int i = 0; i < o.size(); i++) { |
| 218 | o[i] = R::rchisq(a); |
| 219 | } |
| 220 | return o; |
| 221 | } |
| 222 | |
| 223 | // [[Rcpp::export]] |
| 224 | NumericVector runit_rchisq_sugar(double a) { |