Plot 2

R and png file