Выполнить команду из строки - PullRequest
0 голосов
/ 29 января 2019

Использование scopus в r для получения ссылок

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`")

1 Ответ

0 голосов
/ 29 января 2019

Вы можете использовать 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)
...