年份的ggplot x轴

Question

以下是我对散点图的r code。

library(tidyverse)
Pop <-c(24039274, 24854892, 25718048, 26624820, 27568436, 28543940, 29550662, 30590487, 31663896, 32771895)
Popu <- data.frame(Year = 2000:2009, lpop = log2(Pop))
ggplot(Popu, aes(Year, lpop)) + 
  geom_point(size=3, col = "steelblue") +
  ylab("Log2 of Population")

我的问题是，为什么x轴反映2000.0、2002.5等？我该如何解决这个问题？

谢谢。

Answer 1

尝试一下：

Popu <- data.frame(Year = factor(seq(2000,2009,1)), lpop = log2(Pop))
ggplot(Popu, aes(Year, lpop)) + 
geom_point(size=3, col = "steelblue") +
ylab("Log2 of Population")