data(kft5)
dim(kft5)
###########
# frequencies
ftab(kft5)
# Itemparameter to be compared with Rost (2004), page 120.
summary(pair(kft5))
# Itemparameter to be compared with Rost (2004), page 120.
summary(pers(pair(kft5)))
Run the code above in your browser using DataLab