Create R writeup