Finalized pollutantmean.R code -- working and cleaned up with comments