如何通过rlang保留R表达式中的注释？

当然可以实现！你遇到的问题其实是R本身的默认行为：expr()（包括基础R的quote()）在捕获表达式时会自动丢弃注释，因为注释不属于表达式的核心语法结构。不过借助rlang的解析工具，我们可以轻松保留注释。

核心解决方案：从文本解析表达式 #

rlang的parse_expr()（或parse_exprs()用于批量解析多个表达式）可以直接解析带注释的代码字符串，并且会完整保留注释信息：

# 解析带注释的代码字符串
my_expr <- rlang::parse_expr("{ # this is a comment
this_is_code }")

# 查看结果
print(my_expr)

运行后会输出预期的带注释表达式：

{
    # this is a comment
    this_is_code
}

为什么原方法会丢失注释？ #

expr({ # this is a comment this_is_code })这种写法是让R直接捕获当前环境中的表达式，而R的表达式对象在构建时会自动忽略注释——注释只是代码编辑时的元信息，不会被纳入表达式的正式语法结构。

而通过字符串解析的方式，rlang会在解析过程中识别并保留注释的位置与内容，所以打印或使用表达式时，注释会被正确还原。

进阶：保留完整源引用信息 #

如果你需要更细致的源文件位置信息（比如注释在代码中的行号），可以利用解析函数的keep.source参数（默认是TRUE，通常无需手动设置）：

my_expr <- rlang::parse_expr("{ # this is a comment
this_is_code }", keep.source = TRUE)

# 查看包含注释位置的源引用属性
attr(my_expr, "srcref")

注释的详细信息会被存储在表达式的srcref属性中，这在调试或需要还原原始代码格式时非常有用。

内容的提问来源于stack exchange，提问作者MayaGans