Plot 4 .R and .png