r - 从字符串执行命令

Question

在 r 中使用 scopus 检索参考文献

library(rscopus)
auth_token_header("please_add")
akey="please_add"
set_api_key(akey)
x = abstract_retrieval("10.1109/TPAMI.2018.2798607", identifier= "doi")

执行这个可以得到结果

x$content$`abstracts-retrieval-response`$`item`$bibrecord$tail$`bibliography`$reference[[1]]$`ref-info`$`ref-title`

如果我们有这个，如何执行命令并获取结果：

a = 1
ref <- paste("x$content$`abstracts-retrieval-response`$`item`$bibrecord$tail$`bibliography`$reference[[",a,"]]$`ref-info`$`ref-title`")

Answer 1

您可以parse使用eval：

eval(parse(text = "sum(1:10)"))
#[1] 55

尽管通常您应该尝试重新表述您的问题以避免不得不这样做。

fortunes::fortune("parse")
#If the answer is parse() you should usually rethink the question.
#   -- Thomas Lumley
#      R-help (February 2005)