R通过另一个变量绘制多个变量

Question

我有一个这样的数据框：

data <- data.frame(Sex = c("female", "male", "male", "female"),
                  A1 = c(T,T,F,F),
                  A2 = c(T,F,F,F),
                  A3 = c(T,T,T,F)) 

我想要一个Barplot，它向我展示了由女性和男性分组的A1，A2和A3的真实频率。

我试过了：

# table: 
a <- round(prop.table(table(data$Sex, data$A1))*100, 4)
b <- round(prop.table(table(data$Sex, data$A2))*100, 4)
c <- round(prop.table(table(data$Sex, data$A3))*100, 4)

propVars <- cbind(a, b, c)

# remove false:
propVars <- propVars[,c(2,4,6)]

# plot:
barplot(propVars,beside = T)

但是现在我在x轴上得到了真正的性别作为不同的酒吧。但我喜欢将雌性放在x轴的左侧，将雄性放在x轴的右侧。而对于A1，A2和A3，我想要每个一个条，显示每个方面的真实频率，一个用于女性，一个用于男性。我希望你明白：）

由于

Answer 1

尝试：

 barplot(t(propVars),beside=T)