rmd2ppt.Rmd

---
title: "PowerPoint 模板"
author: "黄湘云"
date: "`r format(Sys.time(), tz = 'Asia/Taipei', usetz = TRUE)`"
output: 
  powerpoint_presentation:
    toc: yes
---

# In the morning

## Getting up

- Turn off alarm
- Get out of bed

## Breakfast

- Eat eggs
- Drink coffee

# In the evening

## Dinner

- Eat spaghetti
- Drink wine

---

```{r iris, fig.cap="散点图", echo=FALSE}
plot(iris[,-5], col = iris[,5], pch = 16)
```

## Going to sleep

- Get in bed
- Count sheep


## 壮士！我要模板

```yaml
---
title: "Habits"
output:
  powerpoint_presentation:
    reference_doc: my-styles.pptx
---
```

## Python 块

```{python math, eval = FALSE}
import numpy as np
import matplotlib.pyplot as plt
plt.switch_backend('agg') # Very Important in R Markdown
t = np.arange(0.0, 2.0, 0.01)
s = np.sin(2*np.pi*t)

plt.plot(t,s)
plt.title(r'$\alpha_i > \beta_i$', fontsize=20)
plt.text(1, -0.6, r'$\sum_{i=0}^\infty x_i$', fontsize=20)
plt.text(0.6, 0.6, r'$\mathcal{A}\mathrm{sin}(2 \omega t)$',
         fontsize=20)
plt.xlabel('time (s)')
plt.ylabel('volts (mV)')
plt.show()
# plt.savefig('math-in-plot.png', bbox_inches='tight', dpi = 300)
# plt.savefig('math-in-plot.pdf', bbox_inches='tight')
```

## matplotlib 绘图

```{python demo-matplotlib, ref.label = 'math', fig.cap = "数学公式", eval = TRUE, echo = FALSE}
```



## 软件信息 {.allowframebreaks}

```{r}
xfun::session_info("rmarkdown")
```