code for book  <<ggplot2 Elegant Graphics for Data Analysis>>