饼图中添加文字的位置控制-ggplot2（非公式）
前面给大家讲过怎么去画饼图 https://www.omicsclass.com/article/376
也讲过堆叠柱状图 https://www.omicsclass.com/article/369
pie图讲解主要是针对图片中文字的添加位置公式进行了解释，这里结合堆叠柱状图内容 介绍不利用公式，而利用geom_bar(position)geom_text（postion)控制饼图文字的添加过程；
譬如：
###数据
type=c("A","B","C","D","E")
Num=c(90,34,56,99,15)
dat=data.frame(type,Num)
dat
###创建有序因子，方便颜色填充
dat$type=factor(dat$type,levels = dat$type,order=T)
dat$type
###画图,柱状图 position_stack(reverse =T)控制填充顺序反向，第一个起始于坐标0的位置
p_pie=ggplot(dat,aes(x="",y=dat[,2],fill=dat[,1]))+
geom_bar(stat="identity",width=1,position = position_stack(reverse =T))
p_pie
极坐标变换与颜色等设置
###添加极坐标进行图片变换
p_pie=p_pie+
coord_polar(theta="y",direction=1)
p_pie
###修改颜色、标签
p_pie=p_pie+
scale_fill_brewer(palette ="Set3",direction = 1)+
labs(x="",y="",fill="Type")+
ggtitle(label ="test",subtitle=NULL)
p_pie
控制 geom_text(position)
###添加文字，文字位置控制position = position_stack(reverse =T，vjust=0.5)
###reverse =T与柱子填充顺序同时反向，vjust=0.5在堆叠柱子的中间位置添加文字
p_pie=p_pie+
geom_text(aes(x=1.2,label=as.character(dat[,2])),position = position_stack(reverse =T,vjust=0.5),size=3)
p_pie
所以没有公式推导，利用堆叠柱状图文字添加相似的方法添加文字即可
如果想提升自己的绘图技能，我们推荐：R语言绘图基础（ggplot2)
更多生物信息课程：
1. 文章越来越难发？是你没发现新思路，基因家族分析发2-4分文章简单快速，学习链接：基因家族分析实操课程、基因家族文献思路解读
2. 转录组数据理解不深入？图表看不懂？点击链接学习深入解读数据结果文件，学习链接：转录组（有参）结果解读；转录组（无参）结果解读
3. 转录组数据深入挖掘技能-WGCNA，提升你的文章档次，学习链接：WGCNA-加权基因共表达网络分析
4. 转录组数据怎么挖掘？学习链接：转录组标准分析后的数据挖掘、转录组文献解读
5. 微生物16S/ITS/18S分析原理及结果解读、OTU网络图绘制、cytoscape与网络图绘制课程
6. 生物信息入门到精通必修基础课：linux系统使用、perl入门到精通、perl语言高级、R语言入门、R语言画图
7. 医学相关数据挖掘课程，不用做实验也能发文章：TCGA-差异基因分析、GEO芯片数据挖掘、GEO芯片数据标准化、GSEA富集分析课程、TCGA临床数据生存分析、TCGA-转录因子分析、TCGA-ceRNA调控网络分析
8.其他，二代测序转录组数据自主分析、NCBI数据上传、二代测序数据解读
- 发表于 2018-09-05 13:25
- 阅读 ( 10507 )
- 分类：R
