R-检查字符串是否仅包含某些模式

Question

我正在尝试建立一个表格，用户可以在其中插入字符串形式的公式。

他们被允许使用仅运算符和给定的参数名称(例如，par.names<- c("P1", "P2", "P3"))

我需要通过检查用户是否使用过任何其他模式来测试公式是否正确。

例如P1+P2*P3应该是可以接受的，而 P1+P5*P$4应该返回一个错误。

执行此操作的建议方法是什么？

谢谢!

Answer 1

也许你可以试试下面的代码

all(unlist(strsplit(s,"[^[:alnum:]]")) %in% par.names)

例子

> s1 <- "P1+P2*P3"

> s2 <- "P1+P5*P$4"

> all(unlist(strsplit(s1,"[^[:alnum:]]")) %in% par.names)
[1] TRUE

> all(unlist(strsplit(s2,"[^[:alnum:]]")) %in% par.names)
[1] FALSE