Attemps at graphing in R