R 测试符号是否为运算符

给定一个符号，您如何知道它是否是运算符

> expr <- quote(a[b + 1] * c)
> expr[[1]]
`*`

可以使用

==

> expr[[1]] == quote(`+`)
[1] FALSE
> expr[[1]] == quote(`*`)
[1] TRUE

---

但是我想知道是否有一种更简单的方法不涉及几十个

=

。

您可以将表达式转换为字符。这是有效的：

as.character（expr[[1]]）%in%c（“+”，“*”）

。您可以将表达式转换为字符。这是有效的：

as.character（expr[[1]]）%in%c（“+”，“*”）

。

> expr[[1]] == quote(`+`)
[1] FALSE
> expr[[1]] == quote(`*`)
[1] TRUE