R analysis writeup