add pollutantmean.R
Merge ProgrammingAssignment2-