new png plot
new R plotting script