Creates a single flextable that combines the repeated measures ANOVA test results with descriptive statistics for each condition. Useful for compact reporting or worksheets.
create_wg_anova_combined_table(
anova_results_list,
rh_name = "RH1",
dv_name = "Dependent Variable",
condition_labels = NULL,
KEY = TRUE
)
anova_results_list
|
Output from wg_anova_answers().
|
rh_name
|
Character. Research hypothesis name/label. |
dv_name
|
Character. Display name for the DV. |
condition_labels
|
Character vector or NULL. Labels for conditions.
|
KEY
|
Logical. If TRUE, fill with values; if FALSE, blank.
|
A flextable::flextable() object.
library("psych350lab")
data(superman, package = "psych350data")
result <- wg_anova_answers(superman,
dv1 = "rt_critics_score", dv2 = "rt_audience_score")
ft <- create_wg_anova_combined_table(result,
rh_name = "RH1",
dv_name = "Rating",
condition_labels = c("Critics Score", "Audience Score"))
ft
|
F / Mean |
p / SD |
df / N |
MSE |
Decision |
|---|---|---|---|---|---|
RM ANOVA: RH1 |
0.09 |
.771 |
1, 7 |
43.86 |
Retain H0 |
Critics Score |
79.38 |
10.53 |
8 |
||
Audience Score |
80.38 |
10.53 |
8 |