复现SCI图表：ggplot做花瓣图

读文章时看到一幅图，类似于扇形图，只不过聚合了。或者是柱状图，可以理解为环形图，感觉很有意思。查了一下，可以称之为花瓣图，我们简单学做一下，但是一些细节没有实现。

image.png

（reference：The Gut Microbiome Contributes to a Substantial Proportion of the Variation in Blood Lipids）

这种图可以用origin或者prism实现，这里我们采用ggplot作图。代码如下：

setwd("E:/生物信息学/花瓣图")
A <- read.csv("AABB.csv", header = T)
A <- A[1:34,]
ggplot(A,aes(x=case_id,
             y=KRAS_VAF))+
  geom_col(aes(fill=group),show.legend = F,color='black')+
  coord_polar(direction = 1)+
  theme_bw()+
  theme(axis.text.y = element_blank(),
        axis.ticks = element_blank(),
        panel.border = element_blank(),
        axis.title = element_blank(),
        axis.text.x = element_text(colour = 'black',size = 8),
        panel.grid = element_line(colour = 'black'))+
  scale_fill_manual(values = c( "#B84D64","#3D6AAA","#EE7072","tan1","#394D9B"))

image.png

效果类似，但是诸如文字排列，扇形排列，虚线等不尽相同。数据文件以上传至群，感兴趣的可以探索分享！

觉得小编内容有用的、有意思的，点赞、分享、关注一下呗！
更多精彩请关注我的公众号---KS科研分享与服务