将 r 命令粘贴到 rmarkdown 文件中
paste r commands inside rmarkdown file
我希望我的函数在 readme.rmd 文件中放置一段 markdown。但是，我想包含一些 rcode，它们将在呈现新版本的自述文件时执行。
这就是我想要的 readme.rmd:
[![Last-changedate](https://img.shields.io/badge/last%20change-r gsub("-", "--", Sys.Date())-yellowgreen.svg)](/commits/master)"
在 knitr 时间，它会变成带有日期的格式精美的盾牌。
但是要将其粘贴到文档中，我必须转义一些字符：
paste0("`r ", "gsub(\"-\", \"--\", Sys.Date())", "`")
但这导致
[![Last-changedate](https://img.shields.io/badge/last%20change-`r gsub(\"-\", \"--\", Sys.Date())`-yellowgreen.svg)](/commits/master)"
而这不能通过 rmarkdown 错误呈现： unexpected input: gsub(\ ^....
根据Chinsoon12的建议：
" 会使用单引号吗？即使用 paste0("r ", "gsub('-', '--', Sys.Date())", "") "
我的问题解决了！
我现在用双引号和单引号粘贴。
paste0("https://img.shields.io/badge/last%20change-",
"`r ", "gsub('-', '--', Sys.Date())", "`",
"-yellowgreen.svg")
我希望我的函数在 readme.rmd 文件中放置一段 markdown。但是，我想包含一些 rcode，它们将在呈现新版本的自述文件时执行。
这就是我想要的 readme.rmd:
[![Last-changedate](https://img.shields.io/badge/last%20change-r gsub("-", "--", Sys.Date())-yellowgreen.svg)](/commits/master)"
在 knitr 时间，它会变成带有日期的格式精美的盾牌。
但是要将其粘贴到文档中，我必须转义一些字符：
paste0("`r ", "gsub(\"-\", \"--\", Sys.Date())", "`")
但这导致
[![Last-changedate](https://img.shields.io/badge/last%20change-`r gsub(\"-\", \"--\", Sys.Date())`-yellowgreen.svg)](/commits/master)"
而这不能通过 rmarkdown 错误呈现： unexpected input: gsub(\ ^....
根据Chinsoon12的建议：
" 会使用单引号吗？即使用 paste0("r ", "gsub('-', '--', Sys.Date())", "") "
我的问题解决了！ 我现在用双引号和单引号粘贴。
paste0("https://img.shields.io/badge/last%20change-",
"`r ", "gsub('-', '--', Sys.Date())", "`",
"-yellowgreen.svg")