print.summary.prm_power: Print a power analysis summary of a permutation test
In holub008/nymph: Randomization tests for nonparametric inference

Description Usage Arguments Author(s) Examples

Print a power analysis summary of a permutation test

1	print.summary.prm_power(x, ...)

`x`	a summary.prm_power object to be printed

kholub

gen_data <- function(){ data.frame(x = c(rnorm(50), rnorm(50, 1)), class = rep(c('a', 'b'), each = 50)) }
mcrp <- mcr_power(gen_data, c(mean = function(df){ mean(df[df$class == 'a', 'x']) - mean(df[df$class == 'b', 'x']) }, 
                              median = function(df){ median(df[df$class == 'a', 'x']) - median(df[df$class == 'b', 'x']) }),
    'class')
s <- summary(mcrp, .05, 'two.sided')
print(s)