New comparision graph using ggPlot