[[Rcpp::export]]
| 81 | |
| 82 | // [[Rcpp::export]] |
| 83 | List runit_dt( NumericVector xx){ |
| 84 | return List::create( |
| 85 | _["false"] = dt( xx, 5), |
| 86 | _["true"] = dt( xx, 5, true )); |
| 87 | } |
| 88 | |
| 89 | // [[Rcpp::export]] |
| 90 | List runit_pbeta( NumericVector xx, double aa, double bb ){ |