ggplot - 时间变量绘图轴的自定义格式

Question

如何在ggplot2中定义时间变量轴的自定义格式？

DF <- data.frame(TIME = c(350,400,250,650,500,750),
                 CATEGORY = c(1:6))


ggplot(data=DF, aes(x=CATEGORY, y=as_datetime(TIME))) +
  geom_col() +
  scale_y_datetime(labels = date_format("%M:%S"))

我想要的是删除分钟部分的前导零。像这样：

感谢您的时间和努力！

Answer 1

试试这个：

library(ggplot2)
library(lubridate)
library(scales)
DF <- data.frame(TIME = c(350,400,250,650,500,750),
                 CATEGORY = c(1:6))


date_lab <- function(x) {
  paste0(minute(x), ":", format(x, "%S"))
}

ggplot(data=DF, aes(x=CATEGORY, y=as_datetime(TIME))) +
  geom_col() +
  scale_y_datetime(labels = date_lab)

^{由 reprex package (v0.3.0)}

于 2020 年 3 月 24 日创建

ggplot - 时间变量绘图轴的自定义格式

ggplot - Custom format for plot axis of time variable

datetime

r

data-visualization

ggplot2

axis-labels