study.t <- simstudy.t(n = 25, mean = 0.3, sd = 1,
num.experiments = 2, alternative = "greater", mu = 0,
conf.level = 0.95, the.quantiles = c(0.025, 0.975),
experiment.name = "experiment",value.name = "x", seed = 817)
Run the code above in your browser using DataLab