r - 使用 R 编程的翻转硬币模拟

Question

我是 R 新手，我正在做一个练习题。模拟掷硬币 200 次，然后绘制数据的直方图。我做了：

outcomes      <- c("heads", "tails")
sim_fair_coin <- sample(outcomes, size = 200, replace = TRUE)
hist(table(sim_fair_coin))

它确实给了我一个直方图，但我想我希望得到一个更直观的直方图。用 X 轴显示“正面”或“反面”；Y 轴显示我得到了多少次“正面”和“反面”。我相信有一种方法可以在 R 中实现这一点。有人可以告诉我更多关于它的信息吗？

score 0 · Accepted Answer

您可以使用该ggplot2软件包。

x <- as.data.frame(sim_fair_coin)
ggplot(x, aes(factor(sim_fair_coin))) + geom_bar(width=.5)

1 回答 1