# NOT RUN {
### Not run because it takes too long and may generate
### warnings because of the bootstrapping of the confidence
### intervals
factorLoadingDiamondCIplot(fa(Thurstone.33, 2,
n.iter=100, n.obs=100));
### And using a lower alpha value for the diamonds to
### make them more transparent
factorLoadingDiamondCIplot(fa(Thurstone.33, 2,
n.iter=100, n.obs=100),
alpha = .5);
# }
Run the code above in your browser using DataCamp Workspace