我对R很陌生，希望在研究中向每个参与者发送他们对他们的结果的个人反馈。为此，我认为我需要按参与者ID号汇总数据集（如果我走错了路，请纠正我！），但是这样做有麻烦。 我尝试使用rbind和cbind将他们对每个变量/问题的答案组合在一起，然后使用aggregate（）表示每个参与者的平均分数。这是我第一次使用aggregate（）函数，所以我不确定我做错了什么。
mod_4 <- rbind(model_4_tab$Q_Prior, model_4_tab$Q_Field, model_4_tab$Q_Speciality, model_4_tab$Q_Ability_Evidence, model_4_tab$Q_Ability_Belief, model_4_tab$Q_Opinion, model_4_tab$Q_BackedUp, model_4_tab$Q_Consistency, model_4_tab$Q_Trust_Fair, model_4_tab$Q_Trust_Correct, model_4_tab$Q_Credibility, model_4_tab$Q_Value, model_4_tab$Q_Weight)
mod_4 <- cbind(model_4_tab$Q_Prior, model_4_tab$Q_Field, model_4_tab$Q_Speciality, model_4_tab$Q_Ability_Evidence, model_4_tab$Q_Ability_Belief, model_4_tab$Q_Opinion, model_4_tab$Q_BackedUp, model_4_tab$Q_Consistency, model_4_tab$Q_Trust_Fair, model_4_tab$Q_Trust_Correct, model_4_tab$Q_Credibility, model_4_tab$Q_Value, model_4_tab$Q_Weight)
aggregate(mod_4, by = list(
ID = model_4_tab$ID,
Qs = mod_4),
FUN = mean, INDICES = model_4_tab$ID, simplify = TRUE, drop = FALSE)
谢谢您的帮助！