# \donttest{
# note: iter = 250 for demonstrative purposes
Y <- ptsd[,1:3]
#################################
####### example 1: Pearson's ####
#################################
fit <- zero_order_cors(Y, type = "continuous",
iter = 250,
progress = FALSE)
#################################
###### example 2: polychoric ####
#################################
fit <- zero_order_cors(Y+1, type = "ordinal",
iter = 250,
progress = FALSE)
###########################
##### example 3: rank #####
###########################
fit <- zero_order_cors(Y+1, type = "mixed",
iter = 250,
progress = FALSE)
############################
## example 4: tetrachoric ##
############################
# binary data
Y <- women_math[,1:3]
fit <- zero_order_cors(Y, type = "binary",
iter = 250,
progress = FALSE)
# }
Run the code above in your browser using DataLab