# \donttest{
# Load example data
data("jz2017")
# Create table of profile results
res <- ssm_analyze(
jz2017,
scales = 2:9,
measures = c("NARPD", "ASPD")
)
ssm_table(res)
# Create table of contrast results
res <- ssm_analyze(
jz2017,
scales = 2:9,
measures = c("NARPD", "ASPD"),
contrast = TRUE
)
ssm_table(res)
# }
Run the code above in your browser using DataLab