ggplot2 example code from the "Cookbook for R"