Add diamonds dataset from ggplot2 R package