r - 水平轴上有因子的散点图

Question

我正在尝试生成一个简单的散点图，在 x 轴上有一个因子。结果图显示水平线而不是点(不幸的是无法上传图像)。

根据我教授的要求，将一些 SAS 代码转录为 R，基于来自 Bennett 的 Dobson 的广义线性模型简介中的示例 3.5。目的是向我的同学介绍 R，所以我试图保持它尽可能简单和干净。

dat <- data.frame(age_group = c("30-34", "35-39", "40-44", 
    "45-49", "50-54", "55-59", "60-64", "65-69"), 
                  deaths = c(1, 5, 5, 12, 25, 38, 54, 65), 
                  population = c(17742, 16554, 16059, 13083, 10784, 9645, 10706, 9933))
dat <- within(dat, {
              rate <- deaths / population * 100000
              lograte <- log(deaths / population * 100000)
              })

还有我的阴谋

with(dat, plot(age_group, lograte, pch=19))

不会产生我想要的“点”。我有一个 hacked together 解决方案，稍后我会发布，但想看看是否有更好的方法。再次抱歉无法上传图片。

Answer 1

使用基础 R，您可以执行以下操作:
通过 xaxt="n" 抑制 x 轴然后手动添加。

plot(1:nrow(dat), dat$lograte, xaxt="n", xlab="age_group", ylab="lograte", pch=19)
axis(1, at=1:8, labels=dat$age_group)

您可以使用 ggplot2 来实现它而不是基础 R 图:

require(ggplot2)
ggplot(dat, aes(x=age_group, y=lograte)) + geom_point()