[[Rcpp::export]]
| 178 | |
| 179 | // [[Rcpp::export]] |
| 180 | List runit_pnorm( NumericVector xx ){ |
| 181 | return List::create( |
| 182 | _["lowerNoLog"] = pnorm( xx, 0.0, 1.0 ), |
| 183 | _["lowerLog"] = pnorm( xx, 0.0, 1.0, true, true ), |
| 184 | _["upperNoLog"] = pnorm( xx, 0.0, 1.0, false ), |
| 185 | _["upperLog"] = pnorm( xx, 0.0, 1.0, false, true ) |
| 186 | ); |
| 187 | } |
| 188 | |
| 189 | // [[Rcpp::export]] |
| 190 | List runit_ppois( NumericVector xx){ |