我想列出调用中使用的所有符号或名称。

我找到了以下方法,但肯定有更惯用或更有效的方法吗?

expr <- quote(a + b * (a / b))
expr <- as.list(expr)
while(!identical(expr, (expr <- unlist(lapply(expr,as.list))))){}
unique(expr)
#> [[1]]
#> `+`
#>
#> [[2]]
#> a
#>
#> [[3]]
#> `*`
#>
#> [[4]]
#> b
#>
#> [[5]]
#> `(`
#>
#> [[6]]
#> `/`

reprex package (v0.3.0) 于 2019-08-27 创建

最佳答案

您可以使用 all.names 获取调用中使用的所有符号:

expr <- quote(a + b * (a / b))
unique(all.names(expr))
#[1] "+" "a" "*" "b" "(" "/"

关于r - 如何列出通话中使用的所有符号?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/57670823/

10-13 09:08