Replacing same part of multiple col names in R

Question

After creating some dummy variables, R creates some unhelpful colnames: they start with ".data_"

a <- as.factor(c("green", "yellow