---
title: "ch01"
output: html_document
---

```{r}
library(ggplot2)
a = 1
b = 2
a
```

`r {e=new.env(parent=parent.frame());e$a=a;knitr::knit_child("ch02.Rmd", envir = e)}`

```{r}
a
```