Update ggplot2-example1.R