library("psych350lab")
data(superman, package = "psych350data")
sm <- superman
sm$era <- ifelse(sm$year >= 2000, 2, 1)
result <- anova_factorial_answers(sm, dv = "clark_height_in",
iv1 = "clark_grp", iv2 = "era",
iv1_labels = c("Under 6ft", "6ft+"),
iv2_labels = c("Pre-2000", "Post-2000"))
cat(format_factbg_main_effect_results(result,
iv_name = "Height Group", which_iv = "IV1"))Factorial Main Effect Results Text
Description
Returns formatted text for a main effect test with descriptive/misleading evaluation, either filled (answer key) or blank (worksheet).
Usage
format_factbg_main_effect_results(
anova_results_list,
iv_name = "IV",
which_iv = "IV2",
KEY = TRUE,
highlight = TRUE
)
factbg_main_effect_results(
anova_results_list,
iv_name = "IV",
which_iv = "IV2",
KEY = TRUE,
highlight = TRUE
)
Arguments
anova_results_list
|
Output from anova_factorial_answers().
|
iv_name
|
Character. Display name for the IV being tested. |
which_iv
|
Character. “IV1” or “IV2” to select which main effect.
|
KEY
|
Logical. If TRUE, show filled answers. If FALSE, show blanks.
|
highlight
|
Logical. If TRUE and KEY = TRUE, wrap answers in highlight markup.
|
Value
A character string with markdown/HTML formatting.