use melt and facets to plot all on one ggplot2 object
small edits
small edits