r - PubMed ID とタイトルの取得: HTTP エラー

Question

ジャーナル名、日付、巻、号、ページ番号を使用して、Pubmed ID とタイトルを取得する R コードを作成しました。

ファイルには次のような行が含まれています

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'

どこが間違っているのか教えてください。