pmt(
"association.corr", method = "pearson",
alternative = "greater", n_permu = 10000
)$test(Table5.1.2)$print()
t <- pmt(
"association.corr", method = "spearman",
alternative = "two_sided", n_permu = 10000
)$test(Table5.1.2)$print()
t$type <- "asymp"
t
t <- pmt(
"association.corr", method = "kendall",
alternative = "greater", n_permu = 0
)$test(Table5.2.2)$print()
t$type <- "asymp"
t
Run the code above in your browser using DataLab