Получение неожиданной ошибки в моем заявлении case_when - PullRequest
0 голосов
/ 20 февраля 2019

Написал case_when операторов для создания нового столбца с присваиванием значений моим условным оператором.Тем не менее, я получаю сообщение об ошибке: неожиданно ")" в ".

Я не вижу ничего плохого в моих закрывающих скобках

brfss2013 <- brfss2013 %>%
  mutate(mentalHealth = cut(menthlth,breaks=breaks4,labels=labels4,include.lowest=TRUE)) %>%
  mutate(incomeLev = case_when(grepl("*$15,000|*$20,000",income2)~"0-$20,000"
                               grepl("*$25,000|*$35,000",income2)~"$25,000-$35,000"
                               grepl("*$50,000|*than $75,000",income2)~"$50,000-$75,000"
                               income2 == "$75,000" ~ "Over $75,000"
                               )) 
...