update ggplot lecture, bonus question