doing plotting with R