qplot(x-coordinate, y-coordinate, data=data_frame, geom = c("point", "smooth")