2014-01-08 110 views
1

我和结构的data.frame:R-语言,转换data.frame时间序列

> str(MSK) 
'data.frame': 14685 obs. of 3 variables: 
$ code : Factor w/ 423 levels "100 975","101 479",..: 281 281 281 281 281 281 281 281 281 281 ... 
$ period: Date, format: "2010-01-01" "2010-02-01" "2010-03-01" "2010-04-01" ... 
$ sales : num 515 195 414 410 551 18 373 74 62 313 ... 

我需要将此数据转换为一个矩阵或行另一data.frame:“期“和列:”代码“。 有些“代码”时间序列没有完整。缺失值必须等于NA。

例如,我有一个数据是这样的:

code data sales 
303 1day 200 
303 2day 300 
303 3day 400 
404 2day 250 
404 3day 350 
606 2day 167 

我需要得到:

 303 404 606 
1day 200 NA NA 
2day 300 250 167 
3day 400 350 NA 

这不是很难直接做到这一点,但我想知道的权利转换方式。

对不起,我的母语是俄语,我是一个在学校的穷学生。

感谢您的关注。 =)

+2

你可以做的比花接下来的30分钟阅读在该_ample_文档(优秀的和广泛使用的)差多少[** **动物园(HTTP: //cran.rstudio.com/package=zoo)包...回答了这个问题和其他问题,并做得很好。 –

+0

@DirkEddelbuettel,我补充说明。动物园可以这样做吗?如果不这样做,那还能有什么? – maruschin

回答

2

reshape2使用dcasthttp://cran.r-project.org/web/packages/reshape2/reshape2.pdf

my_df <- data.frame(
         period=c("1day","2day","3day","2day"), 
         code=c(303,303,304,305), 
         sale=c(100,200,300,400)) 
library(reshape2) 
my_df2 <- dcast(my_df,period~code,value.var="sale") 

输出:

> my_df 
     period code sale 
    1 1day 303 100 
    2 2day 303 200 
    3 3day 304 300 
    4 2day 305 400 

    > my_df2 
     period 303 304 305 
    1 1day 100 NA NA 
    2 2day 200 NA 400 
    3 3day NA 300 NA 
+0

我添加了一个解释。你的代码不工作,因为我看到,但感谢reshape2和融化,我试图阅读手册。 – maruschin

+0

谢谢,这是工作。 – maruschin