R:stringlijst in ifelse

ifelse(cc1 %in% c("a", "b"), 1, 0)

Of gewoon:

as.numeric(data$cc1 %in% c("a", "b"))

Vermijd het gebruik van attach hoewel. Het maakt de boel rommelig.