Create DensityPlot.R