科恩的Kappa分析，数据输入的问题

Question

我需要测量两个人的25只猴子的身份的观察者之间的可靠性。下载的软件包有：irr和psych

实际上，我的两个专栏如下所示：

obs_1 = c(1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1),
obs_1 = c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1)

所以第二列中的2表示了我和另一个猴子名字(ID)观察者之间的不一致。

我将上面的列组合成一个数据框架：

df2<- as.data.frame (cbind(obs_1,obs_2))

但是，当我尝试使用以下任一项运行kappa分析时：

cohen.kappa(df2)

或

cohen.kappa(scores,w=NULL,n.obs=2,alpha=.05,levels=NULL)

我确实收到了k的估计值，我的产出如下：

Cohen Kappa and Weighted Kappa correlation coefficients and confidence boundaries 
                 lower estimate   upper
unweighted kappa -4.4e-07        0 4.4e-07
weighted kappa   -4.4e-07        0 4.4e-07

Number of subjects = 25 

我哪里出问题了？

Answer 1

我认为问题是你的数据几乎没有变化。唯一的变化就是意见不一致。因此，你得到了一个零的卡帕。如果你改变你的例子来完成协议，你将得到一个1的卡帕：

obs_1 = c(1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1)
obs_2 = c(1, 1, 1, 1, 1, 1, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1)

df2<- data.frame(obs_1,obs_2)

cohen.kappa(df2)

Cohen Kappa and Weighted Kappa correlation coefficients and confidence boundaries 
                 lower estimate upper
unweighted kappa     1        1     1
weighted kappa       1        1     1