如何使用ggplot2绘制时间序列数据,其中每行都有一个hh:mm:ss
时间戳?例如:
48:09:35 0.2
48:09:36 0.3
48:12:05 0.4
48:35:48 0.5
每个时间戳都采用小时:分钟:秒的形式,例如
48:09:35
。我想把它作为X轴,将与时间戳相关联的值作为Y轴绘制出来,但要适当地按照小时-分钟-秒的时间戳间距设置X轴。
在R中的ggplot2中有一种方法可以做到这一点吗?
如何使用ggplot2绘制时间序列数据,其中每行都有一个hh:mm:ss
时间戳?例如:
48:09:35 0.2
48:09:36 0.3
48:12:05 0.4
48:35:48 0.5
48:09:35
。由于您的时间超出了24小时的日常范围,因此不能使用标准函数(例如chron
包中的chron
)您可以将Time
变量转换为数值。
df$Time_secs <- unlist(lapply(lapply(strsplit(df$Time, ":"), as.numeric), function(x) x[1]*60^2+x[2]*60+x[3]))
ggplot(df, aes(x = Time_secs, y = Value)) + geom_line() + scale_x_continuous(labels = df$Time)
数据:
dput(df)
structure(list(Time = c("48:09:35", "48:09:36", "48:12:05", "48:35:48"
), Value = c(0.2, 0.3, 0.4, 0.5)), .Names = c("Time", "Value"
), class = "data.frame", row.names = c(NA, -4L))