這是我第一次在堆疊溢位中提問。最近我通過制作多個餅圖對氨基酸進行了一些資料可視化首先，這是我的資料集
library(ggplot2)
df = data.frame(Species <-c('Chicken','Chicken','Chicken','Chicken','Chicken','Human','Human','Human','Human','Human','Crab-eating macaque','Crab-eating macaque','Crab-eating macaque','Crab-eating macaque','Crab-eating macaque','Mouse','Mouse','Mouse','Mouse','Mouse','Zebrafish','Zebrafish','Zebrafish','Zebrafish','Zebrafish'),
Amino_acids <- c('E','R','G','P','Others','E','R','G','P','Others','E','R','G','P','Others','E','R','G','P','Others','E','R','G','P','Others'),
value <- c(18,6,10,9,57,26,14,8,5,46,29,15,10,4,42,23,17,7,5,48,31,4,13,7,46))
df$Species <- factor(df$Species)
df$Amino_acids <- factor(df$Amino_acids)
然后，使用ggplot2進行資料可視化
ggplot(data=df, aes(x=" ", y=value, group=Amino_acids, colour=Amino_acids, fill=Amino_acids))
geom_bar(width = 1, stat = "identity", position= "fill")
coord_polar("y", start=0)
facet_grid(.~ Species) facet_wrap(.~Species, strip.position="top") theme_void()
結果就是這個
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/523446.html
標籤：rggplot2饼形图