Update pollutantmean.R

Confusion...