moves c2a1p1 into its own file, pollutantmean.R