# The following example is derived from
# the "bn1_data" dataset, included in the MOTE library.
# A health psychologist recorded the number of close inter-personal
# attachments of 45-year-olds who were in excellent, fair, or poor
# health. People in the Excellent Health group had 4, 3, 2, and 3
# close attachments; people in the Fair Health group had 3, 5,
# and 8 close attachments; and people in the Poor Health group
# had 3, 1, 0, and 2 close attachments.
anova_model <- lm(formula = friends ~ group, data = bn1_data)
summary.aov(anova_model)
omega_f(dfm = 2, dfe = 8,
f_value = 5.134, n = 11, a = .05)
# Backwards-compatible dotted name (deprecated)
omega.F(dfm = 2, dfe = 8,
Fvalue = 5.134, n = 11, a = .05)
Run the code above in your browser using DataLab