Yes.
Put this at the top of your R Markdown file:
```{r setup, echo=FALSE}
opts_chunk$set(echo = FALSE, cache=FALSE)
read_chunk('../src/your_code.R')
```
Delimit your code with the following hints for knitr
(just like @yihui does in the example):
## @knitr part1
plot(c(1,2,3),c(1,2,3))
## @knitr part2
plot(c(1,2,3),c(1,2,3))
In your R Markdown file, you can now have the snippets evaluated in-line:
Title
=====
Foo bar baz...
```{r part1}
```
More foo...
```{r part2}
```
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…