remove repeated records only for some rows with dplyr

Question

I'd like to remove records repeated twice or more times (based on variables: ID, start, drug), but only for some rows. What am I writing wrong?

data <- data %>%
          case_when(ID %in% c(282,464,474)) %>%
          distinct(ID, start, drug, .keep_all = TRUE)

Answer 1

You could subset data, remove duplicates and join again.

data <- data %>%
          filter(ID %in% c(282,464,474)) %>%
          distinct(ID, start, drug, .keep_all = TRUE) %>%
bind_rows(data %>% 
    filter(!(ID %in% c(282,464,474))))