Delete 3-4 Histograms SOLN.R