clean up and add comments to polutantmean.R