Adding plots. Finish using R Markdown