# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
cohen_loop <- function(sample_n1, mean_diff, sample_n2, test_method, alternative, ratio_sd = 1, mu = 0, B = 1000L) {
.Call(`_PRDA_cohen_loop`, sample_n1, mean_diff, sample_n2, test_method, alternative, ratio_sd, mu, B)
}
cor_loop <- function(n, alternative, B, Eigen_matrix) {
.Call(`_PRDA_cor_loop`, n, alternative, B, Eigen_matrix)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.