最近看了一篇微生物的文章,感觉他的图做的很好看!最终发现,ggalluvial包可以做这种冲击图。
Wei R, Ding Y, Gao F, Zhang L, Wang L, Li H, Wang H. Community succession of the grape epidermis microbes of cabernet sauvignon (Vitis vinifera L.) from different regions in China during fruit development. Int J Food Microbiol. 2022 Feb 2;362:109475. doi: 10.1016/j.ijfoodmicro.2021.109475. Epub 2021 Nov 13. PMID: 34798479.
#安装包
install.packages("ggalluvial")
install.packages("tastypie")
library(ggalluvial)
library(ggplot2)
library(ggthemes)
library(tidyverse)
library(ggsci)
library(cowplot)
library(tastypie)
#读入数据
df=read.csv('MCMPphylum.csv',header = T)
head(df)
<