r - 是否有 R 函数可以调整条形图轴的比例？

Question

我有一个名为 crashes_deaths_injuries_TA_pop 的数据框，如下所示:

<表类=“s-表”><标题>TA_name人口 <正文>血腥34466布勒444444克鲁斯34455

我试图用条形图显示数据，但是，x 轴的比例困惑，我不知道如何。我知道这一定很容易，但我是编码新手，所以我很挣扎。

这是我的条形图代码:

ggplot(crashes_deaths_injuries_TA_pop, aes(x = reorder(TA_name, Population), y = Population, fill = Population)) +
  geom_col(alpha = 0.7) +
  scale_fill_distiller(palette = "Reds", direction = 1) +
  coord_flip() +
  labs(x = "", y = "Population", fill = "Population",
       title = "Populations of South Island TA's | 2018",
       caption = "Data: Census 2018, StatsNZ") +
  theme_minimal() +
  theme(legend.position = "none") 

我还想知道如何在每个 TA_name 的每个栏末尾添加人口作为数字

Answer 1

使用scale_y_continuous(breaks = )编辑x轴的刻度，并使用geom_text在条形图旁边添加Population。这是一个例子。

ggplot(crashes_deaths_injuries_TA_pop, aes(x = reorder(TA_name, Population), y = Population, fill = Population)) +
  geom_col(alpha = 0.7) +
  scale_fill_distiller(palette = "Reds", direction = 1) +
  coord_flip() +
  labs(x = "", y = "Population", fill = "Population",
       title = "Populations of South Island TA's | 2018",
       caption = "Data: Census 2018, StatsNZ") +
  theme_minimal() +
  theme(legend.position = "none") +
  scale_y_continuous(breaks = seq(0, 5e05, 0.5e05)) + geom_text(aes(label = Population, y = Population+0.18e05))