[[Rcpp::export]]
| 146 | |
| 147 | // [[Rcpp::export]] |
| 148 | NumericVector runit_rbeta(double a, double b) { |
| 149 | NumericVector o(5); |
| 150 | for (int i = 0; i < o.size(); i++) { |
| 151 | o[i] = R::rbeta(a, b); |
| 152 | } |
| 153 | return o; |
| 154 | } |
| 155 | |
| 156 | // [[Rcpp::export]] |
| 157 | NumericVector runit_rbeta_sugar(double a, double b) { |