R 重塑、聚合/连接字符串

我正在以国家年格式汇总数据集，并使用

melted <- melt(data, id = c("ccode.a","year"))

data.fix <- function(x) c(max = max(x), sum = sum(x), min = min(x),
                          newcol = paste(x, sep = ","))
casted <- cast(melted, ccode.a + year ~ ..., data.fix)

---

您不需要对其进行

重塑

，只需使用普通的

聚合

# All aggregated values
aggregate(data$conflictID.a,by=list(data$ccode.a,data$year),c)
# Just unique values
aggregate(data$conflictID.a,by=list(data$ccode.a,data$year),unique)

---

我不得不稍微调整一下，因为我正在聚合所有的数据，但这非常有效。谢谢但是，有没有办法通过重塑来做到这一点？好奇。我原以为

cast（熔化，ccode.a+year~variable，fun.aggregate=list）

会管用，但事实并非如此。我不明白为什么。

# All aggregated values
aggregate(data$conflictID.a,by=list(data$ccode.a,data$year),c)
# Just unique values
aggregate(data$conflictID.a,by=list(data$ccode.a,data$year),unique)