R 在ggplot中以条形图显示百分比

我有一个包含二进制变量的数据集，如下所示

M4 = matrix(sample(1:2,20*5, replace=TRUE),20,5)
M4 <- as.data.frame(M4)
M4$id <- 1:20

M4=矩阵（样本（1:2,20*5，替换为真），20,5）
M4试试这种方法：

test <- ggplot(M5, aes(x = variable, fill = value, position = 'fill')) + 
  geom_bar() +
  scale_y_continuous(labels = percent_format()) +
  stat_bin(aes(label=paste("n = ",..count..)), vjust=1, geom="text")
test

尝试以下方法：

test <- ggplot(M5, aes(x = variable, fill = value, position = 'fill')) + 
  geom_bar() +
  scale_y_continuous(labels = percent_format()) +
  stat_bin(aes(label=paste("n = ",..count..)), vjust=1, geom="text")
test

尝试以下方法：

test <- ggplot(M5, aes(x = variable, fill = value, position = 'fill')) + 
  geom_bar() +
  scale_y_continuous(labels = percent_format()) +
  stat_bin(aes(label=paste("n = ",..count..)), vjust=1, geom="text")
test

尝试以下方法：

test <- ggplot(M5, aes(x = variable, fill = value, position = 'fill')) + 
  geom_bar() +
  scale_y_continuous(labels = percent_format()) +
  stat_bin(aes(label=paste("n = ",..count..)), vjust=1, geom="text")
test

您可以从中使用
sjp.stackfrq
功能（请参阅）

M4=矩阵（样本（1:2,20*5，替换为真），20,5）
M4您可以从中使用
sjp.stackfrq
功能（请参阅）

M4=矩阵（样本（1:2,20*5，替换为真），20,5）
M4您可以从中使用
sjp.stackfrq
功能（请参阅）

M4=矩阵（样本（1:2,20*5，替换为真），20,5）
M4您可以从中使用
sjp.stackfrq
功能（请参阅）

M4=矩阵（样本（1:2,20*5，替换为真），20,5）
M4我非常喜欢使用由ggplot本身创建的隐式信息，如本文所述：


在我看来，这为最终控制ggplot图表的外观提供了很多机会

希望这能有所帮助

Tom
我非常喜欢使用由ggplot本身创建的隐式信息，如本文所述：


在我看来，这为最终控制ggplot图表的外观提供了很多机会

希望这能有所帮助

Tom
我非常喜欢使用由ggplot本身创建的隐式信息，如本文所述：


在我看来，这为最终控制ggplot图表的外观提供了很多机会

希望这能有所帮助

Tom
我非常喜欢使用由ggplot本身创建的隐式信息，如本文所述：


在我看来，这为最终控制ggplot图表的外观提供了很多机会

希望这能有所帮助

Tom
我觉得这不像是一句话，你可能需要像粘贴（圆形（…计数…）/sum（…计数…）*100），“%”之类的东西（而不是粘贴（“n=”，…计数…）
）非常感谢你的帮助！计算出来的数据很漂亮，但我在寻找百分比；也许你能给我一些建议？非常感谢。@Arenburg:该代码返回整个图形的累积百分比，而不是每个条形图。换句话说，所有条中的所有字段加起来都是100%，而我需要每个条加起来都是100%。对我来说，这不像是前面的说明，你可能需要像粘贴（圆形（…计数…）/sum（…计数…）*100），“%”
（而不是粘贴（“n=”，…计数…）
）之类的东西。非常感谢你的帮助！计算出来的数据很漂亮，但我在寻找百分比；也许你能给我一些建议？非常感谢。@Arenburg:该代码返回整个图形的累积百分比，而不是每个条形图。换句话说，所有条中的所有字段加起来都是100%，而我需要每个条加起来都是100%。对我来说，这不像是前面的说明，你可能需要像粘贴（圆形（…计数…）/sum（…计数…）*100），“%”
（而不是粘贴（“n=”，…计数…）

）之类的东西。非常感谢你的帮助！计算出来的数据很漂亮，但我在寻找百分比；也许你能给我一些建议？非常感谢。@Arenburg:该代码返回整个图形的累积百分比，而不是每个条形图。换句话说，所有条中的所有字段加起来都是100%，而我需要每个条加起来都是100%。对我来说，这不像是前面的说明，你可能需要像粘贴（圆形（…计数…）/sum（…计数…）*100），“%”（而不是粘贴（“n=”，…计数…））之类的东西。非常感谢你的帮助！计算出来的数据很漂亮，但我在寻找百分比；也许你能给我一些建议？非常感谢。@Arenburg:该代码返回整个图形的累积百分比，而不是每个条形图。换句话说，所有条中的所有字段加起来等于100%，而我需要每个条加起来等于100%。