3

我编写了一个 R 代码来使用期刊名称、日期、卷、期号和页码来获取 Pubmed 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'

请让我知道我哪里出错了？

4

0 回答 0