R program to graph scatter plot