[[Rcpp::export]]
| 95 | |
| 96 | // [[Rcpp::export]] |
| 97 | NumericVector runit_dgamma( double x, double a, double b ){ |
| 98 | return NumericVector::create(R::dgamma(x, a, b, 0), R::dgamma(x, a, b, 1)); |
| 99 | } |
| 100 | |
| 101 | // [[Rcpp::export]] |
| 102 | NumericVector runit_pgamma( double x, double a, double b ){ |