[[Rcpp::export]]
| 98 | |
| 99 | // [[Rcpp::export]] |
| 100 | List runit_pbinom( NumericVector xx, int n, double p){ |
| 101 | return List::create( |
| 102 | _["lowerNoLog"] = pbinom(xx, n, p ), |
| 103 | _["lowerLog"] = pbinom(xx, n, p, true, true ), |
| 104 | _["upperNoLog"] = pbinom(xx, n, p, false ), |
| 105 | _["upperLog"] = pbinom(xx, n, p, false, true ) |
| 106 | ); |
| 107 | } |
| 108 | |
| 109 | // [[Rcpp::export]] |
| 110 | List runit_pcauchy( NumericVector xx, double loc, double scl){ |