使用R绘制zoo类系列数据时出错

我是stackoverflow社区的新手，这是我问的第一个问题。如果我做错了什么，请告诉我

这就是我的问题所在。我正在处理澳大利亚的电价问题，我的时间序列是这样的。这是每30分钟采样一次的高频数据

> head(t)
                     VIC   NSW   QLD SNOWY    SA
1999-01-01 00:00:00 26.84 24.29 26.52 26.20 29.87
1999-01-01 00:30:00 30.52 27.64 19.34 29.74 36.01
1999-01-01 01:00:00 28.74 26.64 17.47 28.34 35.70
1999-01-01 01:30:00 27.94 25.81 17.08 27.43 31.67
1999-01-01 02:00:00 20.90 19.94 15.84 20.86 22.42
1999-01-01 02:30:00 20.26 19.48 15.68 20.28 21.38

> tail(t)
                     VIC   NSW   QLD SNOWY    SA
2006-12-31 21:00:00 14.59 15.10 13.72 15.35 29.60
2006-12-31 21:30:00 14.77 15.42 14.12 15.61 28.79
2006-12-31 22:00:00 14.12 15.01 13.54 15.06 20.59
2006-12-31 22:30:00 15.15 16.19 15.10 16.21 17.44
2006-12-31 23:00:00 15.17 16.14 15.48 16.18 17.84
2006-12-31 23:30:00 16.96 17.14 16.37 17.63 20.20

> class(t)
[1] "xts" "zoo"

我试图计算出一天中每个时间点的平均价格。所以我这样做了：

> half.hourly.means <- aggregate(t$VIC, list(format(index(t), "%H:%M")), FUN = mean)
> head(half.hourly.means)

00:00 26.99938
00:30 24.67273
01:00 21.78190
01:30 26.46662
02:00 21.27931
02:30 18.57727   

> tail(half.hourly.means)

21:00 27.86881
21:30 26.65468
22:00 23.51793
22:30 25.68527
23:00 23.26385
23:30 30.01726

> class(half.hourly.means)
[1] "zoo"

当我尝试这个的时候

> plot(as.numeric(half.hourly.means), type = "l")

我没能发布一张图片，因为我的名声不好，很抱歉

它生成正确的绘图，但x轴值没有意义。所以我的问题是：如果x轴的值是00:00，00:30，01:00，…，我们可以做些什么来生成上面的图形

谢谢你的耐心

致以最良好的祝愿

Wei

问题在于格式。。。在聚合语句中，将时间转换为字符类。将其转换为chron package times类。

> plot(as.numeric(half.hourly.means), type = "l")