[英]deparse expressions containing `:=`?
表达式包含:=
不要很好地deparse
:
call1 <- quote(f(a = b(c = d)))
call2 <- quote(f(a := b(c := d)))
# nice
deparse(call1)
#> [1] "f(a = b(c = d))"
# not nice
deparse(call2)
# [1] "f(`:=`(a, b(`:=`(c, d))))"
我想从call2
得到以下输出: "f(a := b(c := d))"
。
我正在寻找一个解决方案:=
=
在所有情况下都是=
或<-
。
解决方法
此解决方法使用<<-
具有相似或相同的优先级并且不经常使用的事实。 我代替:=
由<<-
在原来的呼叫,然后deparses很好,我gsub
回:=
。 我想要一个干净而通用的解决方案。
gsub("<<-",":=", deparse(do.call(
substitute, list(call2, list(`:=` = quote(`<<-`))))))
#> [1] "f(a := b(c := d))"
您可以使用rlang::expr_deparse()
来实现您想要的结果,它提供了一些打印改进。
rlang::expr_deparse(call2)
[1] "f(a := b(c := d))"
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.