Update TimeSeriesAnalysis/Lab2.R