# NOT RUN {
#Continuous data
sim.Norm <- sim.chordal(nodes = 20, inverse = "cases", n = 1000)
#Ordinal data
sim.Likert <- sim.chordal(nodes = 20, inverse = "cases", n = 1000, ordinal = TRUE)
#Dichotomous data
sim.Binary <- sim.chordal(nodes = 20, inverse = "cases", n = 1000, ordinal = TRUE, ordLevels = 5)
# }
Run the code above in your browser using DataLab