R：使用时间索引将mts转换为非时间序列数据框的最佳方法

我目前使用以下方法将mts数据集转换为时间索引为列的数据框。有没有更优雅的方式来做到这一点？R：使用时间索引将mts转换为非时间序列数据框的最佳方法

z <- ts(matrix(rnorm(300), 100, 3), start=c(1961, 1), frequency=12) 
YM<-cbind(Year=as.numeric(floor(time(z))),Month=as.numeric(cycle(z))) 
z<-cbind(as.data.frame(YM),as.data.frame(z)) 

str(z)

来源

2011-02-11 Zach

试试这个：

data.frame(Year = c(floor(time(z) + .01)), Month = c(cycle(z)), z)

或

as.data.frame(cbind(Year = floor(time(z) + .01), Month = cycle(z), z))

来源

2011-02-11 20:45:22

您可以提取从TS与index()指数（从动物园包）

zindex <- index(z) 
zdf <- data.frame(Year = trunc(zindex), Month = (zindex - trunc(zindex)) * 12, z)

或生成的日期与

Year = rep(1961:1969, each = 12)[1:100] 
Month = rep(1:12, times = 9)[1:100]

来源

2011-02-11 20:31:01

我想有一个函数来做到'X - TRUNC（x）的`但是我画一个空白的那一刻... – 2011-02-11 20:31:46

`指数（）`不是基本函数，所以你应该指定它在动物园包中。 – 2011-02-11 20:37:18

类似的解决方案的序列@ jonw的，但使用xts：

x <- as.xts(z) 
d <- data.frame(Year=.indexyear(x)+1900, Month=.indexmon(x)+1, coredata(x))

来源

2011-02-11 20:41:11

R：使用时间索引将mts转换为非时间序列数据框的最佳方法

回答

相关问题