R Markdown Guide

---
title: "My Report"
output: html_document
---

---
title: "Quarterly Report"
author: "Jane Smith"
date: "`r Sys.Date()`"
output:
  html_document:
    toc: true
    toc_float: true
---

output: html_document
# or
output: pdf_document
# or
output: word_document

```{r}
summary(mtcars)
```

```{r load-data, echo=FALSE, message=FALSE}
library(tidyverse)
data <- read_csv("data.csv")
```

echo    = TRUE   # show source code?
eval    = TRUE   # run the code?
include = TRUE   # include output?
warning = TRUE   # show warnings?
message = TRUE   # show messages?
fig.width  = 7   # plot width (inches)
fig.height = 5   # plot height (inches)

```{r setup, include=FALSE}
knitr::opts_chunk$set(
  echo = TRUE,
  warning = FALSE,
  message = FALSE,
  fig.width = 8,
  fig.height = 5
)
```

The mean is `r mean(c(1, 2, 3, 4, 5))`.

Report generated on `r Sys.Date()`.
The dataset has `r nrow(data)` rows.

Einstein's formula is $E = mc^2$ where $c$ is the speed of light.

$$\sum_{i=1}^{n} x_i = x_1 + x_2 + \cdots + x_n$$

$$\bar{x} = \frac{1}{n}\sum_{i=1}^{n} x_i$$

output:
  html_document:
    toc: true
    toc_float: true
    theme: flatly
    highlight: tango

output:
  pdf_document:
    toc: true
    number_sections: true
    latex_engine: xelatex

output:
  word_document:
    reference_docx: my-template.docx

output: github_document

output:
  beamer_presentation:
    theme: "AnnArbor"
    colortheme: "dolphin"