2019-11-30 yyplot 绘制 研究 趋势线图
2019-11-30 本文已影响0人
my_derek
首先要安装y叔的包（yyplot），
例如我研究的方向为脑血管方向,想知道脑缺血方面RNA的研究趋势,在PubMed上文章数量
library(yyplot)
library(ggplot2)
Subject <- c("ischemia","lncRNA","stroke","miR")
pubmed <- pubmed_trend(Subject, year= seq(2009,2019,by=1))
p <- ggplot(pubmed, aes(x=year, y=number, color=TERM)) +
geom_point() + geom_line() + theme_bw() +
xlab("Year") + ylab("Publications per Year")
p+scale_x_continuous(breaks=seq(2008, 2019, 1))
出图之后
Snipaste_2019-11-30_18-36-44.png
美化一下，换个杂志的风格看看
Snipaste_2019-11-30_18-36-26.png
