ICC值是一个较为陌生的概念,在统计学中应用较多,引用百度百科的介绍:
组内相关系数(ICC)是衡量和评价观察者间信度(inter-observer reliability)和复测信度(test-retest reliability)的信度系数(reliability coefficient)指标之一。它最先由Bartko于1966年用于测量和评价信度的大小。ICC等于个体的变异度除以总的变异度,故其值介于0~1之间。0表示不可信,1表示完全可信。一般认为信度系数低于0.4表示信度较差,大于0.75表示信度良好,对于定量资料常常需要更高的ICC值。
——百度百科
一般的编程语言中计算ICC值的手段比较少,需要在专业的软件SPSS、SAS中,才能进行比较方便的计算。今天推荐一个新的方法——利用R语言的irr包完成icc值的分析。
话不多说,直接上代码示例:
#twoway agreement
#Relative Path of the file,相对路径
setwd("C:/Users/abc/Desktop/abc/interval")
library("xlsx")
#load the data here
data1 = read.xlsx('gt_ai_merged.xlsx',1)
data2 = data1[1:147,5:6]
#data2指提取第5-6列,第1-147行的数据
#这里需要安装lpSolve包和irr包
library('lpSolve')
library('irr')
icc(data2, model="twoway",type="agreement")
result <- icc_