Updated R markdown writeup