simdat.t <- sim.t(n = 25, mean = 0.3, sd = 1, num.experiments = 2,
experiment.name = "experiment", value.name = "x", seed = 2187)
test.statistics.t <- sim.t.test(simdat.t = simdat.t, alternative = "greater",
mu = 0, conf.level = 0.95, experiment.name = "experiment", value.name = "x")
Run the code above in your browser using DataLab