colours <- c("class", "drv", "fl")
# Doesn't seem to do anything!
for (colour in colours) {
ggplot(mpg, aes(displ, hwy, colour = .data[[colour]])) +
geom_point()
}
for (colour in colours) {
print(ggplot(mpg, aes(displ, hwy, colour = .data[[colour]])) +
geom_point())
}
Run the code above in your browser using DataLab