Description Usage Format Examples
Length, width, and height measurements for Thurstone's 20 hypothetical boxes
1 
A data set of measurements for Thurstone's 20 hypothetical boxes. The data set includes three variables:
x Box length
y Box width
z Box height
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31  data(Box20)
hist(Box20$x,
main = "Histogram of Box Lengths",
xlab = "Length",
col = "blue")
# To create the raw data for Thurstone's 20 hypothetical
# box attributes:
data(Box20)
ThurstoneBox20 < GenerateBoxData(XYZ = Box20,
BoxStudy = 20,
Reliability = 1,
ModApproxErrVar = 0)$BoxData
RThurstoneBox20 < cor(ThurstoneBox20)
# Smooth matrix to calculate factor indeterminacy values
RsmThurstoneBox20 < smoothBY(RThurstoneBox20)$RBY
fout < faMain(R = RsmThurstoneBox20,
numFactors = 3,
rotate = "varimax",
facMethod = "faregLS",
rotateControl = list(numberStarts = 100,
maxItr =15000))
summary(fout, digits=3)
# Note that given the small ratio of subjects to variables,
# it is not possible to generate data for this example with model error
# (unless SampleSize is increased).

Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.