r programming assignment 1: air pollution