Строки Removd, которые не соответствуют всем значениям в векторе - PullRequest
0 голосов
/ 29 ноября 2018

Я пытаюсь очистить набор данных, в котором некоторые участники ответили на все вопросники, а некоторые нет.Я пытаюсь отфильтровать этот набор данных на основе того, соответствует ли столбец "quest_id" (идентификатор вопросника) вектору шаблона идентификаторов вопросника для эксперимента для каждого участника.

До сих пор я пробовал следующее:

questionnaire_ids <- c(15,16,18,14,10,7,11,12,13)
n_times <- c(1,1,8,7,13, 9, 15, 6, 8)
quest_responses <- rep(questionnaire_ids, n_times)

questionnaire_data <- test_data %>%
  select(user_id, user_status, quest_id, q_name, dv) %>%
  filter(user_status == "registered") %>%
  unique() %>%
  group_by(user_id) %>%
  filter(quest_id %in% quest_responses)

Тем не менее, я получаю сообщение об ошибке: длинная длина объекта не кратна короткой длине объекта.

Любые предложения приветствуются (особенно при использовании dplyr / tidyverse).

...