add new pollutantmean.r file