r - 格式化 geom_label 日期

Question

有没有办法格式化 geom_label 打印的日期？在 ggplot2超出它们的原始值(value)？在下面的示例中，日期打印为“1910-01-01”。但是，假设我只想打印月份和日期，并将月份作为文本值。任何人都知道我将如何去做？

library(ggplot2)

df <- data.frame(
  x=1:5,
  y=runif(5,10,40),
  Date=seq(as.Date("1910/1/1"), as.Date("1914/1/1"), "years"))


ggplot(df, aes(x=x, y=y)) +
  geom_point() +
  geom_label(aes(label=Date))

Answer 1

我假设你的意思是 geom_text不是 geom_label .

您可以使用 format提取您想要的内容(请参阅 format.POSIXct 以获取完整列表)

 ggplot(df, aes(x=x, y=y)) +
     geom_point() +
     geom_text(aes(label=format(Date, format = "%b %d")))