Я пытаюсь извлечь реферат из Scopus, используя rscopus и с функциями, которые я получил от https://github.com/christopherBelter/scopusAPI
У меня есть ключ API с использованием моей учетной записи в университете, но когда при попытке сохранить данные в xml, с помощью:
theXML <- searchByString(string = query, outfile = "testdata.xml")
Я получил ошибку:
Error in searchByString(string = query, outfile = "testdata.xml") : Unauthorized (HTTP 401).
3. stop(http_condition(x, "error", task = task, call = call))
2. httr::stop_for_status(theURL) at scopusAPI.R#12
1. searchByString(string = query, outfile = "testdata.xml")
Что-то не так с моим ключом API, поскольку " : Не авторизовано (HTTP 401) "?