铸造时保持变量

Question

我试图将一些长数据转换为wide，但不知道如何将某些变量附加到唯一的id中。下面做了我需要它做的事情，除了它删除了lat和long变量，这些变量附加到每个gridNumber上。我想在去广岛的时候留着。

dput：

df <- structure(list(gridNumber = c("17578", "18982", "18983", "18984", 
"18985", "18986", "18987", "18988", "18989", "18990"), value = c(22.7000007629395, 
22.2900009155273, 22.25, 21.9799995422363, 21.1000003814697, 
20.7700004577637, 20.6200008392334, 20.5699996948242, 20.5699996948242, 
20.5799999237061), lat = c(-95.1249999994964, -95.1666666661633, 
-95.1249999994964, -95.0833333328295, -95.0416666661626, -94.9999999994957, 
-94.9583333328288, -94.9166666661619, -94.874999999495, -94.8333333328281
), long = c(49.4166666666667, 49.375, 49.375, 49.375, 49.375, 
49.375, 49.375, 49.375, 49.375, 49.375), ID = c("PRISM_ppt_stable_4kmM2_190001_bil", 
"PRISM_ppt_stable_4kmM2_190001_bil", "PRISM_ppt_stable_4kmM2_190001_bil", 
"PRISM_ppt_stable_4kmM2_190001_bil", "PRISM_ppt_stable_4kmM2_190001_bil", 
"PRISM_ppt_stable_4kmM2_190001_bil", "PRISM_ppt_stable_4kmM2_190001_bil", 
"PRISM_ppt_stable_4kmM2_190001_bil", "PRISM_ppt_stable_4kmM2_190001_bil", 
"PRISM_ppt_stable_4kmM2_190001_bil")), .Names = c("gridNumber", 
"value", "lat", "long", "ID"), class = c("data.table", "data.frame"
), row.names = c(NA, -10L))

代码：

library(data.table)
wide <- dcast.data.table(df, gridNumber~ID, value = 'value')

Answer 1

为了解释@Frank注释(以及正确的答案)，转换公式采用了LHS ~ RHS形式。LHS是您希望成为行键的一组列，与RHS中的列类似。因此，如果您希望保留gridNumber、lat和long作为每个行的唯一键，那么将LHS设置为gridNumber + lat + long，如下所示：

wide <- dcast.data.table(df, gridNumber + lat + long ~ ID, value = 'value')

dcast可以代替dcast.data.table，正如@Arun所指出的(对于任何版本的>= 1.9.6，目前在CRAN上)。