Added .R scripts and plots

Didn't include raw .txt file - too large