Совокупный набор данных по идентификатору участника - PullRequest
0 голосов
/ 04 октября 2018

Я очень плохо знаком с R и хочу отправить каждому участнику индивидуальные отзывы о своих результатах в моем исследовании.Для этого я считаю, что мне нужно агрегировать набор данных по идентификационному номеру участника (пожалуйста, исправьте меня, если я на неправильном пути!), Однако у меня возникли проблемы с этим.Я попытался объединить их ответы по каждой переменной / вопросу, используя 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)

Спасибо за помощь!

...