最近有朋友问R中绘制冲积图的代码,其本质仍然是条形图只是添加了样本间的连线;案例要求按列计算每个样本的相对丰度跟往常有所不同。...加载R包
library(tidyverse)
library(ggsci)
library(magrittr)
library(reshape)
library(RColorBrewer)
library...,read_tsv("group.xls"),by=c("name"="sample"))
绘制冲积图
ggplot(plot, aes(name, value, alluvium = Genus, stratum...、大小,颜色为黑色
axis.title.y = element_text(margin = margin(r = 10), size = 11, color = "black"), # 设置...= element_blank() # 设置图例框背景为空白
)
图片
绘制组间冲积图
plot %>% select(1,3,4) %>%
group_by(Genus,group) %>%