我有19个周期的19个data.frame。每个data.frame行包含一个观察值,而每列包含一个变量。我想连续转换19个data.frame中的每一个以获得时间序列。
obs <- LETTERS[1:3]
Var1 <- (2:4)
Var2 <- (9:7)
April2014 <- data.frame(obs, Var1, Var2)
TimeSerie.April2014 <- data.frame(OBS = "2014/04/01",
AVar1 = April2014[1,2],
AVar2 = April2014[1,3],
BVar1 = April2014[2,2],
BVar1 = April2014[2,3],
CVar1 = April2014[3,2],
CVar2 = April2014[3,3])
这是一个简单的示例,我想从2014年4月进入TimeSeries.April2014,这样我就可以加入19个期间中的每个期间以获得时间序列。
PS对不起,我的问题很粗糙,这是我的第一个堆栈溢出问题。如果您有任何配方建议,请随时分享。
对于每个数据帧dat
,您可以使用
as.numeric(t(dat[,-1]))
得到你想要的向量。如果您有19个数据帧,则应重复此19次。如果所有数据框都在一个大列表中large_list
,则使用sapply
将为您完成所有工作:
t(sapply(large_list, function (dat) as.numeric(t(dat[,-1]))))
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句