Question

我最近下载了 RISmed 软件包，以从PubMed下载不到500,000篇文章摘要，而我正试图将这些数据输入数据框。尝试包含网格数据时出现我的问题，我收到错误消息

'错误（函数（...，row.names = NULL，check.rows = FALSE，check.names = TRUE，：参数暗示行数不同：'

是否可以将这些信息嵌套到数据框中以进行分析？

RCT_topic <- 'randomized clinical trial'
RCT_query <- EUtilsSummary(RCT_topic, mindate=2016, maxdate=2017, retmax=100)
summary(RCT_query)
RCT_records <- EUtilsGet(RCT_query)

RCT_data <- data.frame('PMID'=PMID(RCT_records), 
                       'Title'=ArticleTitle(RCT_records), 
                       'Abstract'=AbstractText(RCT_records), 
                       'YearPublished'=YearPubmed(RCT_records), 
                       'Month.Published'=MonthPubmed(RCT_records), 
                       'Country'=Country(RCT_records), 
                       'Grant'=GrantID(RCT_records), 
                       'Acronym'=Acronym(RCT_records), 
                       'Agency'=Agency(RCT_records),
                       'Mesh'=Mesh(RCT_records))

Answer 1

考虑使用tibble：

library(RISmed)
library(dplyr) # tibble and other functions

RCT_topic <- 'randomized clinical trial'
RCT_query <- EUtilsSummary(RCT_topic, mindate=2016, maxdate=2017, retmax=100)
summary(RCT_query)
RCT_records <- EUtilsGet(RCT_query)

RCT_data <- data_frame('PMID'=PMID(RCT_records),
                       'Title'=ArticleTitle(RCT_records),
                       'Abstract'=AbstractText(RCT_records),
                       'YearPublished'=YearPubmed(RCT_records),
                       'Month.Published'=MonthPubmed(RCT_records),
                       'Country'= Country(RCT_records),
                       'Grant' =GrantID(RCT_records),
                       'Acronym' =Acronym(RCT_records),
                       'Agency' =Agency(RCT_records),
                       'Mesh'=Mesh(RCT_records))

Mesh列现在是数据帧列表：

select(RCT_data, PMID, Mesh)
# # A tibble: 100 x 2
#    PMID     Mesh                 
#    <chr>    <list>               
#  1 29288775 <data.frame [21 × 2]>
#  2 29288545 <data.frame [19 × 2]>
#  3 29288510 <data.frame [15 × 2]>
#  4 29288507 <data.frame [19 × 2]>
#  5 29288478 <data.frame [16 × 2]>
#  6 29288309 <data.frame [19 × 2]>
#  7 29288191 <data.frame [11 × 2]>
#  8 29288190 <data.frame [23 × 2]>
#  9 29288184 <data.frame [21 × 2]>
# 10 29288175 <data.frame [12 × 2]>
# # ... with 90 more rows

如何将PubMed中的Mesh写入数据帧

1 个答案: