script to plot the graphics using R