The output textfile was generated by Words.py big.txt | sort -f | uniq -i -c | sort -g -r.
output <- read.table("~/Desktop/output", quote="", comment.char = "")
head(output)
## V1 V2
## 1 78172 the
## 2 39450 of
## 3 37009 and
## 4 28295 to
## 5 21393 in
## 6 20610 a