complete.R that worked.

Need to get data from the pollutantmean.R script. Why do I need to fix the column names?