为计算ICC2（双向随机效应模型）整理数据的技术咨询

数据重构说明 #

你的原始数据是长格式（每行对应1名参与者的1个条目），而psych::ICC()需要的输入是每行对应1个被评分单元（即每个参与者的单个条目）、每列对应1名评分者的宽格式。你的数据其实已经符合这个核心结构，只需提取评分列即可直接使用。

步骤1：提取评分数据 #

直接从原始数据中分离出两名评分者的评分列，得到适合ICC计算的数据集：

library(psych)

# 提取评分列，每行对应一个(Subject, Condition)评分单元
icc_input <- data[, c("Rater1", "Rater2")]

步骤2：计算ICC2（双向随机效应模型） #

调用ICC()函数，指定双向随机模型与一致性类型（ICC2对应一致性，排除评分者系统偏差）：

# 计算ICC2：双向随机效应、一致性
icc_output <- ICC(icc_input, model = "twoway", type = "consistency")

# 查看完整结果
print(icc_output)

参数说明 #

• model = "twoway"：指定双向随机效应模型（评分者和评分单元均为随机抽样）
• type = "consistency"：计算一致性ICC（即ICC2）；若需绝对一致性（不排除评分者系统偏差），改用type = "agreement"

可选：验证数据完整性 #

确保所有评分单元都有完整的两名评分者数据：

# 检查缺失值数量
sum(is.na(icc_input))

内容的提问来源于stack exchange，提问作者joh_anna