Appendix to: Examining Inter-Rater Reliability in a Reality Baking Show

The Data

Run this code to redreate the data frame:

df <- 
  data.frame(
    Moshik = c(1L, 1L, 1L, 1L, 0L, 1L, 0L, 1L,
               0L, 1L, 0L, 1L, 0L, 1L, 1L, 1L,
               0L, 0L, 0L, 0L, 1L, 1L, 1L, 1L,
               1L, 0L, 0L, 0L, 1L, 1L, 0L),
    Assaf = c(1L, 0L, 1L, 0L, 1L, 1L, 1L, 1L,
              0L, 1L, 1L, 1L, 0L, 1L, 0L, 1L,
              0L, 0L, 0L, 1L, 1L, 0L, 1L, 1L,
              0L, 0L, 1L, 0L, 1L, 1L, 0L),
    Erez = c(1L, 0L, 1L, 0L, 1L, 1L, 1L, 1L,
             0L, 0L, 0L, 0L, 0L, 0L, 1L, 0L,
             1L, 1L, 0L, 1L, 0L, 1L, 1L, 1L,
             1L, 0L, 0L, 0L, 0L, 1L, 0L),
    Yosi = c(1L, 0L, 0L, 0L, 1L, 1L, 0L, 1L,
             0L, 1L, 1L, 1L, 1L, 1L, 0L, 1L,
             0L, 0L, 0L, 0L, 1L, 0L, 0L, 1L,
             0L, 0L, 1L, 0L, 1L, 1L, 0L)
  )
head(df)
##   Moshik Assaf Erez Yosi
## 1      1     1    1    1
## 2      1     0    0    0
## 3      1     1    1    0
## 4      1     0    0    0
## 5      0     1    1    1
## 6      1     1    1    1
comments powered by Disqus