Update createLapChart.R