如何绘制这个时间序列数据
How to plot the this time series data
我有以下数据显示不同日期的变量值。我如何绘制这些数据?数据如下所示。 b 列在 2004 年上升。
a b
1 44 1990-12-06
2 5 1990-12-06
3 17 1992-04-18
4 64 1992-04-18
5 58 1992-11-27
6 0 1992-11-27
7 52 1992-12-26
8 4 1992-12-26
9 277 1993-01-02
10 52 1993-01-23
11 7 1993-01-23
...
a 和 b 列可以互换。我想将其绘制为从开始年到结束年的性能。
任何帮助将不胜感激
一个简单的时间序列图是否符合您的要求?
foo <- structure(list(a = c(44, 5, 17, 64, 58, 0, 52, 4, 277, 52, 7),
b = structure(c(7644, 7644, 8143, 8143, 8366, 8366, 8395,
8395, 8402, 8423, 8423), class = "Date")), .Names = c("a",
"b"), row.names = c(NA, -11L), class = "data.frame")
plot(foo$b,foo$a,type="o")
如果你有很多个值,我建议用灰色绘制它们(这样你就不会丢失原始数据)并用平滑曲线覆盖它们,就像这样:
foo <- data.frame(a=rnorm(366),b=as.Date("2015-01-01")+(0:365))
plot(foo$b,foo$a,type="o",col="grey")
lines(foo$b,predict(loess(a~as.numeric(b),foo)),lwd=2)
顺便说一下,this textbook section on graphical time series tools 可能会有帮助。
我有以下数据显示不同日期的变量值。我如何绘制这些数据?数据如下所示。 b 列在 2004 年上升。
a b
1 44 1990-12-06
2 5 1990-12-06
3 17 1992-04-18
4 64 1992-04-18
5 58 1992-11-27
6 0 1992-11-27
7 52 1992-12-26
8 4 1992-12-26
9 277 1993-01-02
10 52 1993-01-23
11 7 1993-01-23
...
a 和 b 列可以互换。我想将其绘制为从开始年到结束年的性能。
任何帮助将不胜感激
一个简单的时间序列图是否符合您的要求?
foo <- structure(list(a = c(44, 5, 17, 64, 58, 0, 52, 4, 277, 52, 7),
b = structure(c(7644, 7644, 8143, 8143, 8366, 8366, 8395,
8395, 8402, 8423, 8423), class = "Date")), .Names = c("a",
"b"), row.names = c(NA, -11L), class = "data.frame")
plot(foo$b,foo$a,type="o")
如果你有很多个值,我建议用灰色绘制它们(这样你就不会丢失原始数据)并用平滑曲线覆盖它们,就像这样:
foo <- data.frame(a=rnorm(366),b=as.Date("2015-01-01")+(0:365))
plot(foo$b,foo$a,type="o",col="grey")
lines(foo$b,predict(loess(a~as.numeric(b),foo)),lwd=2)