制作比例堆积条

Question

我有一个数据框example 有两个变量 V1 和 V2，它们都是虚拟变量。我想创建一个以 V1 为 x 轴的堆叠比例图。

我尝试了以下方法，但图表未显示：

library(ggplot2)
library(plyr) 
library(dplyr)

example<-as.data.frame(cbind(c(0,0,0,0,1,1,1,0,1),c(0,1,0,0,1,0,0,0,1)))
class(example$V1)
class(example$V2)

ce = ddply(example, "V1", mutate, percent_v2 = sum(V2)/length(V2) * 100)
ggplot(ce, aes(x=V1, y=percent_v2, fill=V2),geom_bar(stat='identity'))

我认为fill=V2 可能是错误的，因为 V1 和 V2 都是整数，所以我尝试了 as.character(V2)，但效果不佳。

Answer 1

试试：

 ggplot(ce, aes(x=V1, y=percent_v2, fill=V2))+geom_bar(stat="identity")

补充：

    V1 V2 percent_v2
 1  0  0         20
 2  0  1         20
 3  0  0         20
 4  0  0         20
 5  0  0         20
 6  1  1         50
 7  1  0         50
 8  1  0         50
 9  1  1         50