# NOT RUN {
#This dataset includes two raters who wrote the word listed by
#the participant and rated if the word was correct in the recall
#experiment.
data(rater_data)
#Consider normalizing the text if raters used different styles
#Calculate percent match for categorical answers
kappa(rater_data$rater1_word, rater_data$rater2_word)
kappa(rater_data$rater1_score, rater_data$rater2_score)
# }
Run the code above in your browser using DataLab