[[Rcpp::export]]
| 69 | |
| 70 | // [[Rcpp::export]] |
| 71 | List runit_dnorm( NumericVector xx ){ |
| 72 | return List::create( |
| 73 | _["false_noMean_noSd"] = dnorm( xx ), |
| 74 | _["false_noSd"] = dnorm( xx, 0.0 ), |
| 75 | _["false"] = dnorm( xx, 0.0, 1.0 ), |
| 76 | _["true"] = dnorm( xx, 0.0, 1.0, true ), |
| 77 | _["true_noSd"] = dnorm( xx, 0.0, true ), |
| 78 | _["true_noMean_noSd"] = dnorm( xx, true ) |
| 79 | ); |
| 80 | } |
| 81 | |
| 82 | // [[Rcpp::export]] |
| 83 | List runit_dt( NumericVector xx){ |