Assignment1/pollutantmean.R