tuna <- read.csv("http://samplecsvs.s3.amazonaws.com/Sacramentorealestatetransactions.csv",TRUE,",")
class(tuna) #data.frame
head(tuna)