[[Rcpp::export]]
| 174 | |
| 175 | // [[Rcpp::export]] |
| 176 | NumericVector runit_qlnorm( double x, double a, double b ){ |
| 177 | return NumericVector::create(R::qlnorm(x, a, b, 1, 0), R::qlnorm(log(x), a, b, 1, 1), |
| 178 | R::qlnorm(x, a, b, 0, 0), R::qlnorm(log(x), a, b, 0, 1)); |
| 179 | } |
| 180 | |
| 181 | // [[Rcpp::export]] |
| 182 | NumericVector runit_rlnorm(double a, double b) { |