在 R 中，如何使用 quote 或 bquote 引用评论？

Question

quote(# this is a comment)

我怎样才能像上面那样做？

Answer 1

不太清楚您要实现的目标，但以下内容应该可行：

您可以轻松地将主题标签存储在字符串中：

string<- "# this is a comment"
如果您需要将其放在引号中，您可以这样做：

dQuote("# this is a comment",q = options(useFancyQuotes=FALSE))

这个 returns: "\"# this is a comment\"" .

选项 useFancyQuotes=FALSE 确保使用“正常”引号（而不是排版引号）。如果您省略此参数，结果将是 "“# this is a comment”"

Answer 2

quote() 在其 wholeSrcref 属性中捕获原始代码，该属性保留注释：

x <- quote({
    ## This is a comment
})

src <- attributes(x)$wholeSrcref          # <--- preserves the comment

但是，这个returns是classsrcref的对象，不是可以传递给eval()的真表达式。根据您尝试执行的操作，您可能会发现 these functions for manipulating srcref objects 很有用。例如，

as.character(src)[2]
[1] "    ## This is a comment"

in R, how do I quote a comment using quote or bquote?