箱式图


#读入TSV文件  #我直接Qiime2生成的
data=read.table('shannon.tsv',header = T,row.names = 1)

#画箱线图(shannon指数)
VarY=data$shannon_entropy  #修改变量
library(ggplot2)
p=ggplot(data = data,aes(x=zq101,y=VarY))+
  geom_boxplot(aes(fill=zq101))
p
#data = data指定数据表格
#x=group指定作为x轴的数据列名
#y=shannon指定作为y轴的数据列名
#geom_boxplot()表示画箱线图
p1=p+ labs(title=" ", #改标题名
           x=" ",                     #改最底下分组,可空白
           y="shannon_entropy statistics index ")    #改Y轴的名
p1
#更改横坐标标题和纵坐标标题
p2=p1+theme(text = element_text(size = 10,face = "plain"), 
          plot.title=element_text(hjust=0.5),
          legend.key=element_blank(), 
          legend.title=element_blank(),legend.position="right")
p2
#修改字号字形且标题居中

#加散点 (不加)
p3=p2+ geom_jitter(aes(shape=zq101), position=position_jitter(.1))
p3

#透明背景
p4=p2+theme(panel.background=element_rect(fill='transparent',colour='black'),
           panel.grid=element_blank())
p4

#不加
p5=p4+theme(legend.position = c(0.9,0.9))
p5

#杠前面数越大,箱体越扁
p6=p4+theme(aspect.ratio = 1.6/1)+ theme(legend.position="right")
p6

#“plain”默认普通值, “bold” 粗体、 “italic”斜体
p7=p6+ annotate("text", x=2.32, y=1.5, label=paste("H = 3.676","\nP = 0.055") ,
                alpha=1,colour = "black",size = 3, angle=0,
                fontface="plain")
p7
# 输出图片
zoom=2 # 控制图片缩放比例
ggsave(paste0("shannon.png"), p7, width=89*zoom, height=60*zoom, units="mm")
ggsave(paste0("shannon.pdf"), p, width=89*zoom, height=60*zoom, units="mm")
#也可以输出为PPT 
library(eoffice)
topptx(p7 , "temp1.pptx")

微生物 Alpha多样性 作图 16S 菌群 R语言相关推荐

  1. Protein Cell:基于R语言的微生物组数据挖掘最佳流程(大众评审截止14号晚6点)...

    Protein & Cell综述:基于R语言的微生物组数据挖掘的最佳流程 近日,中国农业科学院刘永鑫组联合南京农业大学袁军组在国际期刊 Protein & Cell (IF = 15. ...

  2. r语言ggplot怎么把多个维度数据合并在一个图中表示_R语言作图——Histogram

    原创:黄小仙 最近小仙同学很是烦恼,本以为自己已经掌握了ggplot2作图的语法,用read.csv(), ggplot()+geom_point()/boxplot()/violinplot()-就 ...

  3. R语言量化:alpha值和beta值

    量化投资中经常提到的alpha(收益)和beta(收益)是从资本资产定价模型(CAPM)中衍生出来的概念.CAPM是一个给风险定价的基本模型,它认为只有系统风险(Systematic risk)才能带 ...

  4. R语言作图——Pie chart(饼图)

    原创:黄小仙 今天要给大家介绍的Pie chart(饼图),本来是不打算写这个的,因为用Excel画饼图实在是太方便了.本着能少动一下是一下的懒人原则,是不打算用R画的,再说,本小仙不是掌握了R作图大 ...

  5. 自定义函数 | 批量计算微生物群落的alpha多样性

    批量计算微生物alpha多样性 批量生成多个矩阵 批量导入数据 定义计算微生物alpha多样指标的函数 批量导出excel    为什么要写这个函数?因为微生物群落的数据测序完后,通常都是以otu或者 ...

  6. r语言实现sem_利用R语言做结构方程模型分析

    R的功能很强大,各种包很多.但就是因为包太多,造成了很大的麻烦.不可避免的,可以做结构方程模型的包也不少,例如:sem.psych.OpenMx,lavaan等.我选择了lavaan包.原因:语法简介 ...

  7. R语言贝叶斯方法在生态环境领域中的高阶技术

    贝叶斯统计学即贝叶斯学派是一门基本思想与传统基于频率思想的统计学即频率学派完全不同的统计学方法,它在统计建模中具有灵活性和先进性特点,使其可以轻松应对复杂数据和模型结构. 然而,很多初学者在面对思想. ...

  8. 价值1143元的《R语言统计分析微生物组数据(Statistical Analysis of Microbiome Data with R)》系列图书

    文章目录 <R语言统计分析微生物组数据> 本书简介 作者简介 章节简介 猜你喜欢 写在后面 <R语言统计分析微生物组数据> Statistical Analysis of Mi ...

  9. r语言怎么把txt数据变成一个Rdata格式_BIOM:生物观测矩阵——微生物组数据通用数据格式...

    简介 http://biom-format.org/ BIOM格式是微生物组领域最常用的结果保存格式,优点是可将OTU或Feature表.样本属性.物种信息等多个表保存于同一个文件中,且格式统一,体积 ...

最新文章

  1. 最新8篇ICML2020投稿论文:自监督学习、联邦学习、图学习、数据隐私、语言模型、终身学习…...
  2. 不同包下,相同数据结构的两个类进行转换
  3. 博客网站源代码_网站建设技术--WORDPRESS
  4. OpenCV Sobel和Scharr (索贝尔和夏尔滤波器检测边缘)
  5. ORACLE 登录相关的信息
  6. 适用于低配机器,从USB摄像头拉H264流的Qt播放器
  7. android系统apk文件,如何安装apk文件 安卓手机apk文件安装方法
  8. 人机交互之Web界面设计与CNN大作业
  9. IDEA告警:Field can be converted to a local varible
  10. 笔记本换SSD固态硬盘,系统速度可以提升吗?
  11. Spring Cloud:负载均衡 - Spring Cloud Loadbalancer原理
  12. 树莓派安装共享打印机HP LaserJet CP1025(foo2zjs)
  13. python实现手机连续点击
  14. 基于Android的火灾报警
  15. angularjs-requirejs-rjs-md5
  16. html页面漏斗图,echarts 漏斗图示例
  17. 24h删:10年数据分析师珍藏Python实战项目,太强大!
  18. 全球与中国陶瓷喷墨机市场现状及未来发展趋势2022-2028
  19. 如何使用会声会影制作边缘虚化效果
  20. 新人如何制作机器人?机器人制作材料及做法揭秘

热门文章

  1. 读书 | 互联网思维到底是什么
  2. BZOJ 4864: [BeiJing 2017 Wc]神秘物质 解题报告
  3. 爬取网易云热门音乐歌单
  4. 2022-2028全球气动吸尘器行业调研及趋势分析报告
  5. 去除COD有机物树脂A-722MP
  6. 诺基亚Lumia 900拥有惊人的快的方式连接
  7. php汉字转拼音库,汉字转拼音的PHP库
  8. python读取串口数据 绘图_使用Python串口实时显示数据并绘图的例子
  9. Windows平台上一些开发软件的卸载与安装@大蟒蛇马戏团
  10. Linux上安装和卸载Redis实例教程