| apa.reg.boot.table {apaTables} | R Documentation |
Creates a regresion table in APA style with bootstrap confidence intervals
apa.reg.boot.table(..., filename = NA, table.number = NA, number.samples = 1000)
... |
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 |
number.samples |
Number of samples to create for bootstrap CIs |
APA table object
Algina, J. Keselman, H.J. & Penfield, R.J. (2008). Note on a confidence interval for the squared semipartial correlation coefficient. Educational and Psychological Measurement, 68, 734-741.
#Note: number.samples = 50 below. # However, please use a value of 1000 or higher # View top few rows of goggles data set # from Discovering Statistics Using R set.seed(1) head(album) # Single block example blk1 <- lm(sales ~ adverts + airplay, data=album) apa.reg.boot.table(blk1) apa.reg.boot.table(blk1,filename="exRegTable.doc") # Two block example, more than two blocks can be used blk1 <- lm(sales ~ adverts, data=album) blk2 <- lm(sales ~ adverts + airplay + attract, data=album) apa.reg.boot.table(blk1,blk2,filename="exRegBlocksTable.doc") # Interaction product-term test with blocks blk1 <- lm(sales ~ adverts + airplay, data=album) blk2 <- lm(sales ~ adverts + airplay + I(adverts * airplay), data=album) apa.reg.boot.table(blk1,blk2,filename="exInteraction1.doc")