Nates first little R code

This just reads data. Mostly to check that I can push stuff to github.