Defined as: 1 - (1 - p0) / (1 - pe). With: p0 = 'observed frequency of
agreement' and pe = 'expected agremeent frequency under independence
Usage
KAPPA(truth, response)
Arguments
truth
vector of true values
response
vector of predicted values
n = 20
set.seed(122)
truth = as.factor(sample(c(1,2,3), n, replace = TRUE))
response = as.factor(sample(c(1,2,3), n, repla
KAPPA(truth, response)