[[Rcpp::export]]
| 52 | |
| 53 | // [[Rcpp::export]] |
| 54 | List runit_dgamma( NumericVector xx ){ |
| 55 | return List::create( |
| 56 | _["NoLog"] = dgamma( xx, 1.0, 1.0), |
| 57 | _["Log"] = dgamma( xx, 1.0, 1.0, true ), |
| 58 | _["Log_noRate"] = dgamma( xx, 1.0, true ) |
| 59 | ); |
| 60 | } |
| 61 | |
| 62 | // [[Rcpp::export]] |
| 63 | List runit_dpois( IntegerVector xx ){ |