Question

以下是我的数据集的片段：

> head(df)
Product   Region  Sector      Type       Date     Value
Product A Capital Primary Continued 2012-01-01      395
Product C Capital Primary Continued 2012-01-01       37
Product D Capital Primary Continued 2012-01-01      208
Product A Central Primary Continued 2012-01-01      343
Product C Central Primary Continued 2012-01-01        1
Product D Central Primary Continued 2012-01-01       80

> tail(df)
   Product   Region  Sector Type      Date    Value
Product C Southern Unknown  New 2014-12-01       11
Product D Southern Unknown  New 2014-12-01       18
Product A  Zealand Unknown  New 2014-12-01       19
Product B  Zealand Unknown  New 2014-12-01       10
Product C  Zealand Unknown  New 2014-12-01        9
Product D  Zealand Unknown  New 2014-12-01        6

我有12个日期，范围从2012-01-01到2014-12-01以及变量的几个因素。我想对这个数据集进行推断，即。在2014-12-01之后添加一些额外的随机观察。我最初的想法是使用dcast，例如：

dcast(df, Date ~ Product + Region + Type + Sector)

为了得到所有因素的组合。这将导致数据帧包含12行（日期）和118列（所有因子的所有组合）。然后我可以在这个数据帧中添加一些行，然后使用melt将其转换回来。但这似乎不太可能。还有其他方法吗？

Answer 1

您可以使用rbind - 只需确保变量名称相同：

df <- data.frame(Product = c("Product A", "Product B", "Product C"), Region = c("Capital", "Capital", "Capital"), 
              Sector = c("Primary", "Primary", "Primary"), Type = c("Continued", "Continued", "Continued"),
              Date = c("2012-01-01", "2013-01-01", "2014-12-01"), Value = c(397, 3, 456))


newdata <- data.frame(Product = c("Product A", "Product B", "Product C"), Region = c("Capital", "Capital", "Capital"), 
                  Sector = c("Primary", "Primary", "Primary"), Type = c("Continued", "Continued", "Continued"),
                  Date = c("2014-12-01", "2014-12-02", "2014-12-03"), Value = c(1, 2, 3))


all(colnames(df) == colnames(newdata))
[1] TRUE


combined <- rbind(df, newdata)

combined

    Product  Region  Sector      Type       Date Value
1 Product A Capital Primary Continued 2012-01-01   397
2 Product B Capital Primary Continued 2013-01-01     3
3 Product C Capital Primary Continued 2014-12-01   456
4 Product A Capital Primary Continued 2014-12-01     1
5 Product B Capital Primary Continued 2014-12-02     2
6 Product C Capital Primary Continued 2014-12-03     3

R中的宽到长格式

1 个答案: