[[Rcpp::export]]
| 583 | |
| 584 | // [[Rcpp::export]] |
| 585 | NumericVector runit_plogis( double x, double a, double b ){ |
| 586 | return NumericVector::create(R::plogis(x, a, b, 1, 0), R::plogis(log(x), a, b, 1, 1), |
| 587 | R::plogis(x, a, b, 0, 0), R::plogis(log(x), a, b, 0, 1)); |
| 588 | } |
| 589 | |
| 590 | // [[Rcpp::export]] |
| 591 | NumericVector runit_qlogis( double x, double a, double b ){ |