# NOT RUN {
sim.data <- data.simulation.factors()
sim.data2 <- data.simulation.factors(n = 30, SNR = 2, K = 5, numb.vars = 20,
numb.factors = 10, max.dim = 3, equal.dims = FALSE, separation.parameter = 0.2)
# }
Run the code above in your browser using DataLab