Added Prog3Work.R

File to build program 3 using aircquality data instead.