如何在knitr :: spin中输出文字反引号

Question

我正在尝试为knitr::spinR Studio中的文档创建一些片段模板,我需要它们包含文字反引号,以便生成的文档包含R片段:

期望输出的示例:

#' ---
#' author: 'ENTER'
#' title: 'ENTER'
#' date: '`r Sys.time()`'
#' output: 
#'    html_document
#' ---

但是,我无法弄清楚如何输出反引号.这个:

`r paste("#' date: '`Sys.time()`')`

当从R Studio片段渲染到R代码时,刻度线中断粘贴命令将无效.我一直在试图勾选刻度线,添加前进和后退斜线等,但还没有找到一个解决方案,使该行正确呈现:

#' date: '`r Sys.time()`'

---

Windows 7企业版,64位操作系统
R版本:3.2.5
R Studio版本:0.99.903
knitr版本:1.14

---

示例:我试过这个,但它仍然翻译R代码而不是只打印文本:

snippet spin.header
`r paste("#' ---")`
`r paste("#' author: 'ENTER'")`
`r paste("#' title: 'ENTER'")`
`r paste("#' date:  '<code>``` `r Sys.time()` ```</code>'")`
`r paste("#' output:")` 
`r paste("#'    html_document")`
`r paste("#' ---")`

Answer 1

正确答案已rawr在评论中发布（他只漏掉了 r 和勾号）：

snippet spin.header
`r paste("#' ---")`
`r paste("#' author: 'ENTER'")`
`r paste("#' title: 'ENTER'")`
`r paste("#\' date: '\x60r Sys.time()\x60'")`
`r paste("#' output:")` 
`r paste("#'    html_document")`
`r paste("#' ---")`