[[Rcpp::export]]
| 512 | |
| 513 | // [[Rcpp::export]] |
| 514 | NumericVector runit_dpois( double x, double a ){ |
| 515 | return NumericVector::create(R::dpois(x, a, 0), R::dpois(x, a, 1)); |
| 516 | } |
| 517 | |
| 518 | // [[Rcpp::export]] |
| 519 | NumericVector runit_ppois( double x, double a ){ |