# matrix with subjects in rows and raters in columns.
# 1st column is taken as gold-standard
m <- matrix(c("O", "G", "O",
"G", "G", "R",
"R", "R", "R",
"G", "G", "O"), ncol = 3, byrow = TRUE)
kappam_gold(m)
Run the code above in your browser using DataLab