从R Markdown文档中删除所有代码块

Question

使用knitr::purl()，可以很容易地从R Markdown文档中提取所有代码块，即：

knitr::purl("foo.Rmd")

创建文件：

foo.R

但是，如果我已经完成了这项工作，现在我只想提取纯文本（或从R Markdown文档中删除所有代码块）。有（简单）方法吗？