| 198 | |
| 199 | inline double beta(double a, double b) { return ::Rf_beta(a, b); } |
| 200 | inline double lbeta(double a, double b) { return ::Rf_lbeta(a, b); } |
| 201 | |
| 202 | inline double choose(double n, double k) { return ::Rf_choose(n, k); } |
| 203 | inline double lchoose(double n, double k) { return ::Rf_lchoose(n, k); } |