plot 1 R scrip t and generated png file