直方图+二分+轴

Question

我想用我的变量“性别”做直方图，值1 =男性，2 =女性。我的代码工作正常，但我想在x轴上只有值1和2（此时R在步骤中打印0到1之间的所有值，这在性别的情况下不太有意义）。

hist(g1_sex, 
     main = "Häufigkeitsverteilung Geschlecht", 
     sub = "1 = männlich, 2 = weiblich",
     xlab = "Geschlecht", 
     ylab ="Häufigkeit",
     ylim = c(0,120),
     col = "lightblue",
     labels = TRUE,
     breaks=2)  

我已经尝试用

做了

breaks = seq (1,2,1)

但这看起来也不太好。

我会非常感谢你的每一个暗示！ 祝福！

Answer 1

我认为你真的想要barplot。见例子：

set.seed(0); x <- rbinom(500, 1, 0.3)  ## generate toy 0-1 data
y <- table(x)   ## make contingency table
names(y) <- c("male", "female")
ylim = c(0, 1.2 * max(y))  ## set plotting range
z <- barplot(y, space = 0, col = 5, main = "statistics", ylim = ylim)
text(z, y + 20, y, cex = 2, col = 5)  ## add count number above each bar

我还提供了在每个栏上方添加数字的解决方案，方法是使用ylim在顶部设置额外的空格，然后使用text放置文字。

请注意，barplot也接受main等，因此您可以根据需要添加其他注释。