[[Rcpp::export]]
| 72 | |
| 73 | // [[Rcpp::export]] |
| 74 | NumericVector runit_qunif( double x, double a, double b ){ |
| 75 | return NumericVector::create(R::qunif(x, a, b, 1, 0), R::qunif(log(x), a, b, 1, 1), |
| 76 | R::qunif(x, a, b, 0, 0), R::qunif(log(x), a, b, 0, 1)); |
| 77 | } |
| 78 | |
| 79 | // [[Rcpp::export]] |
| 80 | NumericVector runit_runif( double a, double b ){ |