[[Rcpp::export]]
| 641 | |
| 642 | // [[Rcpp::export]] |
| 643 | NumericVector runit_qnf( double x, double a, double b, double c ){ |
| 644 | return NumericVector::create(R::qnf(x, a, b, c, 1, 0), R::qnf(log(x), a, b, c, 1, 1), |
| 645 | R::qnf(x, a, b, c, 0, 0), R::qnf(log(x), a, b, c, 0, 1)); |
| 646 | } |
| 647 | |
| 648 | // ------------------- Non-central Student t Distribution |
| 649 |