initial plot.R and png file