# From explicit values.
plot_ci(estimate = 0.45, lower = 0.15, upper = 0.75,
names = "Cohen's d", n = 60, reference_line = 0)
# From ci_smd() output.
ci_result <- ci_smd(smd = 0.5, n_1 = 50, n_2 = 50)
plot_ci(ci_result, n = 100, reference_line = 0)
# Multiple effects from ci_omega_squared(): the expectancy treatment
# and the grade classification in the pygmalion data.
pyg <- pygmalion
pyg$grade <- factor(pyg$grade)
fit <- aov(iq_8 ~ treatment + grade, data = pyg)
omega_result <- ci_omega_squared(fit)
plot_ci(omega_result, reference_line = 0,
xlab = expression(omega^2))
Run the code above in your browser using DataLab