Added R Files

Graphs and code