在ggplot2中创建X轴为日期的折线图时X轴显示整数的问题排查

嘿，我来帮你搞定这个问题！你的代码里有几个小错误导致日期没有正确转换，所以ggplot才会把X轴显示成整数。咱们一步步来修正：

首先，梳理你代码里的问题点： #

• 变量定义顺序颠倒：你先创建了dataframe，但此时Var1、var2还没定义，这会直接报错。得先把所有变量定义好，再组装成数据框。
• 日期格式参数错误：你的原始日期是"22.01.2018"这种点分隔的格式，但你用了"%dd/%mm/%yyyy"——这里不仅分隔符用错了（应该是.而非/），%dd和%mm也是多余的格式符，正确的格式符组合应该是%d（日）、%m（月）、%Y（4位年），对应格式为"%d.%m.%Y"。
• var2是字符型：你把var2定义成了带引号的字符串，ggplot绘制折线图需要数值型数据，得把它转成numeric类型。

修正后的完整代码： #

# 先定义所有变量
var1 <- c("22.01.2018" , "10.01.2018", "2.02.2018", "01.03.2018")
var2 <- c("0.98", "0.05", "0.98", "0.51")
var3 <- c(1, 2, 3, 4) # 这里假设你有对应的var3数据，可根据实际情况替换

# 组装成数据框
dataframe <- data.frame(var1, var2, var3)

# 正确转换日期格式
dataframe$var1 <- as.Date(dataframe$var1, format = "%d.%m.%Y")

# 将var2转为数值型
dataframe$var2 <- as.numeric(dataframe$var2)

# 绘制折线图
library(ggplot2)
ggplot(data = dataframe, aes(x = var1, y = var2)) +
  geom_line(color = "#2E86AB", linewidth = 1) +
  labs(x = "日期", y = "变量2") +
  theme_minimal()

为什么之前X轴显示整数？ #

当as.Date转换失败时，dataframe$var1会变成NA值。ggplot遇到X轴全是NA的情况，会自动用数据的行号（整数索引）来代替，所以你看到的是整数而不是日期。修正格式后，日期被正确识别为Date类型，ggplot就会自动以日期格式展示X轴啦。

内容的提问来源于stack exchange，提问作者Rohi