R ggplot2 plot collection samples