我在R中制作一个情节(在一个情节中绘制三天的时间序列)。我有一个“POSIXlt”“POSIXt”矢量,我只需要保留没有年,月,日的时间(小时,分钟......)。
"2004-09-08 13:50:00 GMT" ---> 13:50:00
"2004-09-08 14:00:00 GMT" ---> 14:00:00
"2004-09-08 14:10:00 GMT" ---> 14:10:00
"2004-09-08 14:20:00 GMT" ---> 14:20:00
"2004-09-08 14:30:00 GMT" ---> 14:30:00
这可能吗?
我已经能够使向量中的所有元素具有相同的年/月/日。它适用于我的情节,但我不认为是合适的解决方案。
"2004-09-08 13:50:00 GMT" ---> "2014-10-19 13:50:00 GMT"
"2004-09-08 14:00:00 GMT" ---> "2014-10-19 14:00:00 GMT"
"2004-09-08 14:10:00 GMT" ---> "2014-10-19 14:10:00 GMT"
"2004-09-08 14:20:00 GMT" ---> "2014-10-19 14:20:00 GMT"
"2004-09-08 14:30:00 GMT" ---> "2014-10-19 14:30:00 GMT"
谢谢
答案 0 :(得分:8)
假设我们有POSIXct值x
。
library(chron)
# input
y <- 1:5
x <- as.POSIXct(c("2004-09-08 13:50:00", "2004-09-08 14:00:00", "2004-09-08 14:10:00",
"2004-09-08 14:20:00", "2004-09-08 14:30:00"))
1)将它们转换为chron class "times"
并绘制:
ti <- times(format(x, "%H:%M:%S"))
plot(y ~ ti)
2)或者你可以用动物园做到这一点:
library(zoo)
z <- zoo(y, x)
# convert index to "times" class and plot
zz <- z
time(zz) <- times(format(time(zz), "%H:%M:%S"))
plot(zz)
2a)或使用ggplot2与autoplot.zoo
进行绘图:
library(ggplot2)
autoplot(zz) + scale_x_chron(format = "%H:%M")
2b)我们也可以通过标记而不是转换索引类来处理这个问题。这使用了zoo / ggplot2 / scales而不是chron时间,只是重新标记X轴:
library(scales)
autoplot(z) + scale_x_datetime(breaks = "10 min", labels = date_format("%H:%M"))