# NOT RUN {
# the point-biserial correlation between
# the total score and the first item, using
# '0' as the reference level
biserial.cor(rowSums(LSAT), LSAT[[1]])
# and using '1' as the reference level
biserial.cor(rowSums(LSAT), LSAT[[1]], level = 2)
# }
Run the code above in your browser using DataLab