获取 ggplot2 以显示每个元素对总数的相对贡献

Question

genocount <-ggplot(SNPs, aes(genotype))
genocount + geom_bar()

创建此条形图：

我希望能够以堆叠方向（沿 x 轴显示）显示每条染色体对每种基因型的贡献百分比。我已经尝试了一些其他人建议的方法，但它们 return 不同的错误...我不确定是否与我的数据集不兼容，或者是否有其他问题。

感谢您的帮助！

library(scales)

ggplot(SNPs, aes(genotype))
    genocount + geom_bar(aes(position = "fill", fill = chromosome))+
    geom_text(aes(label = percent(chromosome/sum(chromosome))))
    scale_y_continuous(labels = percent_format())

Answer 1

我明白你的意思。

对于条形图，代码如下

ggplot(mydf) +
geom_bar(aes(x = var1,y = (..count..)/sum(..count..)),
stat = "count",position = "identity")

以直方图为例，代码如下：

ggplot(data = df) +
geom_histogram(aes(x = var1, y = (..count..)/sum(..count..)),
position = "identity")

别问我什么是..count.. 我只知道这是一个有效的黑魔法

获取 ggplot2 以显示每个元素对总数的相对贡献

getting a ggplot2 to display relative contributions of each element to the total

plot

r

percentage

ggplot2