Update histograms.R