apa.reg.boot.table {apaTables}

Creates a regresion table in APA style with bootstrap confidence intervals

Description

Creates a regresion table in APA style with bootstrap confidence intervals

Usage

apa.reg.boot.table(
  ...,
  filename = NA,
  table.number = NA,
  number.samples = 1000
)

Arguments

...

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

Value

APA table object

References

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.

Examples

## Not run: 
#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")

## End(Not run)