plot2 R and png