efaTable: Exploratory factor analysis table.

In psytabs: Produce Well-Formatted Tables for Psychological Research

Description

Produces a table of the results of exploratory factor analysis.

Usage

efaTable(fa.res, data, mean.sd = TRUE)

Arguments

fa.res	results of exploratory factor analysis as returned by the fa function of the psych package.
data	data.frame on which the EFA was conducted.
mean.sd	logical value that indicates whether means and standard derivitions should be included in the table.

Value

An EFA table.

Examples

data(mydata)
library(psych)
res <- fa(r = mydata[,c("item1", "item2", "item3", "item4")], nfactors = 2)
tab.1 <- efaTable(res, mydata[,c("item1", "item2", "item3", "item4")])
tab.1
tab.2 <- efaTable(res, mydata[,c("item1", "item2", "item3", "item4")], mean.sd = FALSE)
tab.2

#saveTable(tab.1, "efaTable.rtf")

Example output

Loading required namespace: GPArotation
         M   SD  MR1   MR2   h2
item1 0.35 0.62 0.76  0.09 0.62
item2 0.35 0.61 0.63 -0.20 0.38
item3 0.39 0.63 0.45  0.11 0.24
item4 0.36 0.60 0.27  0.34 0.24
       MR1   MR2   h2
item1 0.76  0.09 0.62
item2 0.63 -0.20 0.38
item3 0.45  0.11 0.24
item4 0.27  0.34 0.24

psytabs documentation built on May 29, 2017, 10:52 p.m.