Experiments with ggplot2