001、
c1 <- c("a", "b", "a", "a", "b", "c") c2 <- c(3, 1, 4, 7, 8, 2) dat <- data.frame(c1, c2) ## 测试数据框 dat aggregate(dat$c2, by=list(dat$c1), sum) ## 按照c1列进行合并
