检索PubMed ID和标题：HTTP错误

Question

我已经编写了一个R代码，使用期刊名称，日期，数量，问题和页码来获取发布的ID和标题。

该文件包含

等行

AAPS PharmSci 2000 2 1 E2
AAPS PharmSci 2004 6 1 1-9

我想要的输出就像：

AAPS PharmSci 2000 2 1 E2, 11741218 , Molecular modeling of G-protein coupled receptor kinase 2: docking and biochemical evaluation of inhibitors.

同样适用于文件中的所有行

我在R中为此编写的代码是

    search_topic <- "search term"

    search_query <- EUtilsSummary(search_topic)
    #summary(search_query)

    # see the ids of our returned query
    ID <- QueryId(search_query)

    # get actual data from PubMed
    records<- EUtilsGet(search_query)

    # store it
    pubmed_data <- data.frame(ID,'Title'=ArticleTitle(records))
    write.csv(pubmed_data, file = paste("./",search_topic,".csv",sep=""))

这给出了如下错误：

In addition: Warning message:
In file(con, "r") : cannot open: HTTP status was '502 Server Hangup'

请告诉我哪里出错？