r - 作为一个list.character？

Question

我希望从字符串创建一个调用对象。 alist()或多或少在交互(手动输入)模式下实现了我想要的功能，似乎没有强制方法，而且as.call也没有实现我希望的功能。

考虑以下代码，

string = "<<mychunk, cache=TRUE, fig.show=hold, dev=png, echo=c(1,3)>>="
sanitized = gsub("<<|>>=", "", string)
## as.call(sanitized)
## as.alist(sanitized)

as.alist.character <- function(x)
   eval(parse(text = paste("alist(", x, ")")))

as.alist.character(sanitized)

现在， eval(parse)在我的( hell )圈子中不被接受；你能建议更好吗？

谢谢。

Answer 1

我只是在这里从#142复制我自己的肮脏解决方案，该解决方案与您的解决方案相当(并且存在与“ hell 圈子”相同的问题):

x = 'label,a=1,b=asdf,c="qwer",d=FALSE,e=c(1,2,3)'
z = formals(eval(parse(text = sprintf('function(%s){}', x))))
str(z)

让我们看看是否还有其他更清洁的技巧。