apa.aov.table: Creates a fixed-effects ANOVA table in APA style

Description Usage Arguments Value References Examples

View source: R/apaAOVTable.R

Description

Creates a fixed-effects ANOVA table in APA style

Usage

1
2
apa.aov.table(lm_output, filename, table.number = NA, conf.level = 0.9,
  type = 3)

Arguments

lm_output

Regression (i.e., lm) result objects. Typically, one for each block in the regression.

filename

(optional) Output filename document filename (must end in .rtf or .doc only)

table.number

Integer to use in table number output line

conf.level

Level of confidence for interval around partial eta-squared (.90 or .95). A value of .90 is the default, this helps to create consistency between the CI overlapping with zero and conclusions based on the p-value.

type

Sum of Squares Type. Type II or Type III; specify, 2 or 3, respectively. Default value is 3.

Value

APA table object

References

Smithson, M. (2001). Correct confidence intervals for various regression effect sizes and parameters: The importance of noncentral distributions in computing intervals. Educational and Psychological Measurement, 61(4), 605-632.

Fidler, F., & Thompson, B. (2001). Computing correct confidence intervals for ANOVA fixed-and random-effects effect sizes. Educational and Psychological Measurement, 61(4), 575-604.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
#Example 1: 1-way from Field et al. (2012) Discovery Statistics Using R
options(contrasts = c("contr.sum", "contr.poly"))
lm_output <- lm(libido ~ dose, data=viagra)
apa.aov.table(lm_output,filename="ex1_anova_table.doc")

# Example 2: 2-way from Fidler & Thompson (2001)
# You must set these contrasts to ensure values match SPSS
options(contrasts = c("contr.sum", "contr.poly"))
lm_output <- lm(dv ~ a*b, data=fidler_thompson)
apa.aov.table(lm_output,filename="ex2_anova_table.doc")

#Example 3: 2-way from Field et al. (2012) Discovery Statistics Using R
# You must set these contrasts to ensure values match SPSS
options(contrasts = c("contr.sum", "contr.poly"))
lm_output <- lm(attractiveness ~ gender*alcohol, data=goggles)
apa.aov.table(lm_output,filename="ex3_anova_table.doc")

dstanley4/apaTables documentation built on Feb. 17, 2018, 6:41 p.m.