跟着Nature学作图:R语言ggplot2分组折线图添加误差线 | 您所在的位置:网站首页 › ggplot2绘制折线图和面积图 › 跟着Nature学作图:R语言ggplot2分组折线图添加误差线 |
论文是 Environmental factors shaping the gut microbiome in a Dutch population 数据和代码的github主页链接https://github.com/GRONINGEN-MICROBIOME-CENTRE/DMP 这个也是数据代码的下载链接,可以看目录结构https://zenodo.org/record/5910709#.YmAcp4VBzic 今天的推文重复一下论文中的figure1b image.png 数据集image.png 这里误差线的范围是平均值加减标准差,数据提前算好,整理到csv文件中 读取数据 library(readr) dat01 p1 print(p1) ggplot(data=dat01,aes(x=nr,y=spec.nr.mn,color=Taxon))+ geom_line(size=1.5,linetype=dat01$linetype)+ geom_errorbar(aes(ymin=spec.nr.mn-spec.nr.sd, ymax=spec.nr.mn+spec.nr.sd), size=1.05, colour="black")+ geom_point(shape=21,size=1.75,fill="white")+ xlab("Number of samples") + ylab("Number of features")+ scale_color_manual(values = c("#56B4E9", "#009E73", "#0072B2", "#D55E00", "#CC79A7", "#E69F00"))+ theme_bw()+ theme(text = element_text(size = 17)) -> p2 print(p2) library(patchwork) p1+p2image.png |
CopyRight 2018-2019 实验室设备网 版权所有 |