Added code to...

-Corrected the subsetting criteria
-Write the plot to a png file