r - 是否有 R 函数将 PMID 引入 R 并提取附属/作者/标题数据?
问题描述
我正在寻找一个 R 脚本,它将一个 PMID 列表作为输入,并允许我创建一个数据框,包括 pmid、标题、作者和“地址”或作者隶属关系。我已经使用以下代码直接进行搜索,但似乎无法弄清楚如何通过 PMIDS 的“手动”输入来复制该过程。任何帮助或简化代码都会很棒!!
my_query<-'("critical care"[MeSH Major Topic] OR "Intensive Care Units"[MeSH Major Topic]) AND ("Covid-19"[MeSH Major Topic] OR "SARS-CoV-2"[MeSH Major Topic])'
my_entrez_id <- get_pubmed_ids(my_query)
my_abstracts_txt <- fetch_pubmed_data(my_entrez_id, format = "abstract")
my_abstracts_xml <- fetch_pubmed_data(pubmed_id_list = my_entrez_id)
my_PM_list <- articles_to_list(pubmed_data = my_abstracts_xml)
xx <- lapply(my_PM_list, article_to_df, autofill = TRUE, max_chars = 50) #takes forever
full_df <- do.call(rbind, xx)
full_df[seq(1, nrow(full_df), by = 10), c("pmid", "doi", "title", "abstract", "year", "month", "day", "jabbrv", "journal", "lastname", "firstname", "address", "email")]
解决方案
推荐阅读
- c# - 无法从 IIS 中托管的网站发出外部请求
- javascript - 在函数内反应运行函数
- javascript - 在 Chrome 中,如何知道是否存在“access-control-expose-headers”标头?
- resharper - 使用 ReSharper 的项目忽略代码检查设置的正确方法是什么?
- logstash - 无法使用 grok 匹配可选字段
- javascript - vue 组件(静态)不工作。我要解决
- vue.js - 如何为“vue-form-generator”插件创建新版本
- python - Python - 使用 Numpy 进行相关测试
- python - Itertools.product 中索引处的元素
- html - 网格模板区域无效的属性值