你能改变默认的scale_x_datetime吗？

Question

有没有办法覆盖默认的scale_x_datetime？我知道我可以为每个情节添加+ scale_x_datetime（label =“format”）。

我正在寻找一种方法来全局更改/覆盖当前“智能”格式的顺序。这可能吗？

Answer 1

您可以制作自己的自定义scale_x_datetime函数，并将其用于所有绘图：

library(ggplot2)
library(scales)
start <- ISOdate(2001, 1, 1, tz = "")
dat <- data.frame(day30  = start + round(runif(100, max = 30 * 86400)),
                 y = runif(100))

myDatetime <- function(..., labels = date_format("%d/%m")) {
  scale_x_datetime(..., labels = labels)
}
qplot(day30, y, data = dat) + myDatetime()