如何仅在没有日期的 x 轴上绘制时间间隔？

Question

我正在使用 R-3.2.4。 我一直在尝试仅在 x 轴上绘制数据，在 y 轴上绘制一些值，但每次它都会在 x 轴上显示一些日期以及时间，但是我只需要在 x 轴上显示时间间隔。

这是我正在使用的代码：

data_plot<-        read.csv("C:/.../Data_pract.csv",header=TRUE,stringsAsFactors=F)
data_plot$Time<-as.POSIXct(strptime(data_plot$Time, format="%H:%M"))
mydata<-ggplot(data_plot,aes(x=Time,y=January))+geom_line()
mydata

这是我正在使用的示例数据：

    Time January
    0:00    20
    0:15    30
    0:30    45
    0:45    40
    1:00    28
    1:15    15

我附上了我正在寻找的图表图像。

提前致谢。enter image description here

Answer 1

您可以使用函数 scale_x_datetime

将 ggplot 中的比例更改为日期时间

mydata<-ggplot(data_plot,aes(x=Time,y=January)) + geom_line() +
      scale_x_datetime(date_breaks = "1 hour",
                       date_labels = "%I:%M %p")