Q: Issue with ggplot, coming out as straight line I'm trying to find the relationship between eating ice cream and playing games.
My code: 
sizedata = read.table(file.choose(), header= T, sep =',')
View(sizedata)
summary(sizedata)
lm(Icecream ~ Games, sizedata)

library(ggplot2)

ggplot(sizedata, aes(x=Icecream, y=Games)) + geom_point() + ylim(0,1000) + 
  stat_smooth(method='lm')

ggplot(sizedata, aes(x=Icecream, y=Games)) + geom_point() + ylim(0,1000) + 
  geom_smooth()

The graph comes out looking like:

This is my CSV file with the data

A: As @Russ Hyde and @camille pointed out - your ylim parameter is too high. Try to change it to lower - like ylim(0,100) or ylim(0,50). 
