[[Rcpp::export]]
| 129 | |
| 130 | // [[Rcpp::export]] |
| 131 | NumericVector runit_dbeta( double x, double a, double b ){ |
| 132 | return NumericVector::create(R::dbeta(x, a, b, 0), R::dbeta(x, a, b, 1)); |
| 133 | } |
| 134 | |
| 135 | // [[Rcpp::export]] |
| 136 | NumericVector runit_pbeta( double x, double a, double b ){ |