> setwd("/Users/mark/Documents/Stats")
> x<-read.csv("sites.csv",sep="\t",stringsAsFactors = F)
> summary(x$url)
Length Class Mode
983002 character character
> summary(x$score)
Min. 1st Qu. Median Mean 3rd Qu. Max. NA's
-3.000 -2.000 -1.000 1.977 -1.000 25.000 1
If you have found my website useful, please consider buying me a coffee below 😉