# NOT RUN {
## Simulate some data according to a factor model with 3 latent factors
## Balanced and factorially pure loadings structure
simDAT <- FAsim(p = 24, m = 3, n = 40, loadingvalue = .9)
simDAT$loadings
## Simulate some data according to a factor model with 3 latent factors
## Unbalanced and factorially pure loadings structure
simDAT <- FAsim(p = 24, m = 3, n = 40, loadingvalue = .9,
balanced = FALSE, numloadings = c(10,10,4))
simDAT$loadings
## Simulate some data according to a factor model with 3 latent factors
## Unbalanced and factorially non-pure loadings structure
simDAT <- FAsim(p = 24, m = 3, n = 40, loadingvalue = .9,
balanced = FALSE, numloadings = c(10,10,4),
simplestructure = FALSE)
simDAT$loadings
## Simulate some data according to a factor model with 3 latent factors
## Unbalanced and factorially non-pure loadings structure
## Non-fixed high and low loadings
simDAT <- FAsim(p = 24, m = 3, n = 40, loadingvalue = .9,
balanced = FALSE, numloadings = c(10,10,4),
simplestructure = FALSE, loadingfix = FALSE)
simDAT$loadings
# }
Run the code above in your browser using DataLab