Calculating Maximum Moving Average of Ozone Values Over 18 Hours Using R Programming Language