# NOT RUN {
# loading AIBS dataset
data(AIBS, package = "ShinyItemAnalysis")
# ICC for the whole sample
ICCrestricted(Data = AIBS, case = "ID", var = "Score", rank = "ScoreRankAdj")
# ICC for the range-restricted sample considering 80% of top ratees
ICCrestricted(Data = AIBS, case = "ID", var = "Score", rank = "ScoreRankAdj",
sel = 0.8)
# }
Run the code above in your browser using DataLab