R scripts I wrote for my undergraduate thesis during Summer 2013.