r - 在ggplot中使用位置=“填充”时出错

Question

我正在分析 BRFSS13 数据集中的一些数据，并且在尝试调整我的图表时遇到了麻烦。

我使用以下代码来创建我的 tibble：

vets <- select(brfss2013, veteran3, sex, renthom1, children)
vetTib <- vets %>%
filter(!is.na(veteran3)) %>%
filter(!is.na(renthom1)) %>%
filter(!is.na(children)) %>%
group_by(sex, veteran3, renthom1) %>%
mutate(count = n()) 

到目前为止，一切都很好。然后，我使用 ggplot 创建了一个图表，显示性别如何影响房主身份。

vetTib %>%
ggplot(aes(x = sex, y= count, fill = renthom1)) +
geom_bar(stat = "identity") 

但是女性/男性数据量的差异使得结果图相当无用。在我无限的智慧中，我认为以下将通过将差异显示为比例而不是绝对值来解决问题：

vetTib %>%
ggplot(aes(x = sex, y= count, fill = renthom1)) +
geom_bar(stat = "identity", position = “fill”)

但不幸的是，这给了我以下信息：

Error: unexpected input in:
"    ggplot(aes(x = sex, y= count, fill = renthom1)) +
geom_bar(stat = "identity", position = “"

我不知道我哪里出错了！我之前已经多次使用 geom_bar 和 position = "fill" 所以我真的很困惑为什么它不会做它应该做的事情！

任何帮助是极大的赞赏！

谢谢，斯蒂芬

标签： rggplot2positionfill