我正在尝试使用R创建一个ts对象,每日时间序列从2015年2月24日开始,到2015年4月13日结束.我已经为每日数据设置了频率= 7,但我找不到将确切日期作为起始参数的方法.
我认为这就是你想要的,使用decimal_date()'lubridate'中的函数来获得每日系列的正确开始时间,并假设你想要作为ts索引的值的向量被称为x并且具有适当的长度:
library(lubridate)
df <- ts(x, start = decimal_date(as.Date("2015-02-24")), frequency = 365)
Run Code Online (Sandbox Code Playgroud)
如果我rnorm()用来生成适当长度的x,那么这就是我的样子:
> df
Time Series:
Start = c(2015, 55)
End = c(2015, 103)
Frequency = 365
[1] 0.4284579 1.9384426 0.1242242 -2.4002789 -0.4064669 0.6945274 -0.5172909 0.4772347 0.8758635 -1.7233406 0.5929249 1.5662611 1.0692173 -0.1354226
[15] 1.1404375 0.7714662 -0.2871663 -5.2720038 -1.7353146 -0.7053329 1.0206803 1.7170262 -0.3469172 0.2594851 2.0371700 -2.1549066 -0.6639050 -0.4912258
[29] -0.3849884 -3.0448583 -1.3317834 1.6173705 0.7176759 -0.8646802 -1.7697016 1.1114061 0.6941131 -0.1942612 -0.1836107 -0.5850649 -1.7449090 -3.3646555
[43] -0.4341833 1.9721407 1.4995265 1.7168002 1.8617295 -3.4578959 1.1639413
Run Code Online (Sandbox Code Playgroud)
请注意,对于每日索引,您需要频率= 365而不是7,这表示每周索引.
如果你想要一个可以在'zoo'中使用的日期向量,那么这样做:
seq(from = as.Date("2015-02-24"), to = as.Date("2015-04-13"), by = 1)
Run Code Online (Sandbox Code Playgroud)
所以你要创建一个像这样的动物园对象:
zoo(x, seq(from = as.Date("2015-02-24"), to = as.Date("2015-04-13"), by = 1))
Run Code Online (Sandbox Code Playgroud)
| 归档时间: |
|
| 查看次数: |
9388 次 |
| 最近记录: |