r - 投影仪阴影框中的allowframebreaks使用knitr消失

Question

我有以下代码

\documentclass{beamer} 
\begin{document}
<<setup, include=FALSE>>=
opts_chunk$set(out.lines = 4)
opts_chunk$set(size = 'footnotesize')
options(width=60)
knit_hooks$set(document = function(x) {
gsub('\\\\(begin|end)\\{kframe\\}', '', x)
})
@

在我这样做之后，应该在阴影框中显示的 R 源代码和输出现在消失了。关于如何取回阴影框的任何想法？