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