knitr不会在乳胶文档中打印图表

Question

这是最小的代码：

\documentclass[11pt]{article}
\begin{document}
\SweaveOpts{concordance=TRUE}
ggplot
<<eval=TRUE>>=
require(ggplot2)
ggplot(mtcars, aes(x=mpg, y=hp)) + geom_point()
@

base
<<eval=TRUE>>=
with(mtcars, plot(hp ~ mpg))
@
\end{document}

当我使用R版本3.1.3（2015-03-09）编织时，我只能得到以下内容：

ggplot
> require(ggplot2)
> ggplot(mtcars, aes(x=mpg, y=hp)) + geom_point()
base
> with(mtcars, plot(hp ~ mpg))
1

我的乳胶文件上没有任何数据。上面的代码为什么不在pdf中打印图？