Added completed R Markdown file