Create peakHeights.R