Set PNG bg="transparent"

Removed unused code.
Set PNG background to transparent.
Plot 2

plot2.png and R script to create it.