[[Rcpp::export]]
| 579 | |
| 580 | // [[Rcpp::export]] |
| 581 | List runit_psigamma( NumericVector nn, NumericVector kk){ |
| 582 | return List::create( |
| 583 | _["VV"] = psigamma(nn,kk), |
| 584 | _["PV"] = psigamma(10.0, kk ), |
| 585 | _["VP"] = psigamma(nn, 5.0 ) |
| 586 | ) ; |
| 587 | } |
| 588 | |
| 589 | // [[Rcpp::export]] |
| 590 | List runit_lbeta( NumericVector nn, NumericVector kk){ |
nothing calls this directly
no test coverage detected