2016-06-29
simglm
power.t.test, power.anova.test
n <- seq(4, 1000, 2) power <- sapply(seq_along(n), function(i) power.t.test(n = n[i], delta = .15, sd = 1, type = 'two.sample')$power)
shiny::runGitHub('simglm', username = 'lebebr01', subdir = 'inst/shiny_examples/demo')
or
devtools::install_github('lebebr01/simglm') library(simglm) run_shiny()
simglm, shiny, shinydashboard, ggplot2, lme4, DT