Alluvial图的比例尺和颜色编辑
Alluvial图可以通过ggplot2包中的ggalluvial函数创建。要编辑Alluvial图的比例尺和颜色,可以使用以下代码示例:
library(ggplot2) library(ggalluvial)
#创建Alluvial图 data(murders) ggplot(murders, aes(y = state, axis1 = region, axis2 = total), alluvium = 1, fill = region) + geom_alluvium(aes(fill = region), width = 1/12) + scale_fill_manual(values = c("#00AFBB", "#E7B800", "#FC4E07", "#00B945")) + theme_minimal()+ ggtitle("Alluvial Plot: Murders Dataset")
#编辑比例尺 ggplot(murders, aes(y = state, axis1 = region, axis2 = total), alluvium = 1, fill = region) + geom_alluvium(aes(fill = region), width = 1/12) + scale_fill_manual(values = c("#00AFBB", "#E7B800", "#FC4E07", "#00B945"), name = "Region", labels = c("Northeast", "Midwest", "South", "West")) + theme_minimal()+ ggtitle("Alluvial Plot: Murders Dataset")
#编辑颜色 ggplot(murders, aes(y = state, axis1 = region, axis2 = total), alluvium = 1, fill = region) + geom_alluvium(aes(fill = region), width = 1/12) + scale_fill_manual(values = c("#00AFBB", "#E7B800", "#FC4E07", "#00B945"), name = "Region", labels = c("Northeast", "Midwest", "South", "West")) + theme_minimal() + scale_x_continuous(limits=c(0,1000)) + scale_y_discrete(limits=rev(levels(murders$state))) + ggtitle("Alluvial Plot: Murders Dataset")