Added scatterplot function