Hi all, I get an error on the last step of this code. The other two times I used mutate() it worked. The last time though, the column "KeepFinal" does not get created and gives the following error: Error in UseMethod("mutate_") : no applicable method for 'mutate_' applied to an object of class "character"
R script follows:
library(dplyr)
GSoff_serv <- PreScFilter %>%
arrange(GSoffered) %>%
select(Concatenate, OpenDate, EILName, GSoffered, GSserved) %>%
mutate(KeepOff=ifelse(GSoff_serv$GSoffered=="K" | GSoff_serv$GSoffered=="K-1" | GSoff_serv$GSoffered=="K-3" | GSoff_serv$GSoffered=="K-4", "N", "Y")) %>%
mutate(KeepSer=ifelse(GSoff_serv$GSserved=="K" | GSoff_serv$GSoffered=="K-1" | GSoff_serv$GSoffered=="K-3" | GSoff_serv$GSoffered=="K-4", "N", "Y")) %>%
GSoff_serv$KeepSer[is.na(GSoff_serv$KeepSer)] <- "Y" %>%
mutate(KeepFinal=ifelse(GSoff_serv$KeepOff=="N" & GSoff_serv$KeepSer=="N", "No", "Yes"))