作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我有超过 20 二十个 data.frames 具有相同的列但行数不同。我的目标是通过列“名称”(这是五个名称的列表)合并 data.frames,在合并时我希望具有相同名称的行对 A 列求和,B 列求和,并得到平均值C列。
这是我目前正在做的事情。
首先,我将一次合并 2 个 data.frames。
DF <- merge(x=abc, y=def, by = "Name", all = T)
Name A.x B.x C.x A.y B.y C.y
name1,name2,name3,name4,name5 11 24 7 NA NA NA
name1,name3,name4,name6,name7 4 8 12 3 4 7
name1,name2,name5,name6,name7 12 4 5 NA NA NA
name3,name4,name5,name6,name7 NA NA NA 15 3 28
ifelse
报表处理
NAs
和非唯一行。对于非唯一行,它将为 A 添加为 B 添加,对于 C 它将获得平均值。
DF$A <- ifelse(is.na(DF$A.x), DF$A.y,
ifelse(is.na(DF$A.y), DF$A.x,
ifelse((!is.na(DF$A.x)) & (!is.na(DF$A.y)), DF$A.x + DF$A.y, 1)))
DF$B <- ifelse(is.na(DF$B.x), DF$B.y,
ifelse(is.na(DF$B.y), DF$B.x,
ifelse((!is.na(DF$B.x)) & (!is.na(DF$B.y)), DF$B.x + DF$B.y, 1)))
DF$C <- ifelse(is.na(DF$C.x), DF$C.y,
ifelse(is.na(DF$C.y), DF$C.x,
ifelse((!is.na(DF$C.x)) & (!is.na(DF$C.y)), (DF$C.x + DF$C.y)/2, 1)))
Name A.x B.x C.x A.y B.y C.y A B C
name1,name2,name3,name4,name5 11 24 7 NA NA NA 11 24 7
name1,name3,name4,name6,name7 4 8 12 3 4 8 7 12 10
name1,name2,name5,name6,name7 12 4 5 NA NA NA 12 4 5
name3,name4,name5,name6,name7 NA NA NA 15 3 28 15 3 28
merge1 <- DF[c(1,8,9,10)]
total1 <- merge(x = merge1, y = merge2, by = "Name", all = TRUE)
Name A B C
name1,name2,name3,name4,name5 11 24 7
name1,name3,name4,name6,name7 4 8 12
name1,name2,name5,name6,name7 12 4 5
name3,name4,name5,name6,name7 15 3 28
name1,name3,name4,name6,name7 3 4 8
Name A B C
name1,name2,name3,name4,name5 11 24 7
name1,name3,name4,name6,name7 7 12 10
name1,name2,name5,name6,name7 12 4 5
name3,name4,name5,name6,name7 15 3 28
最佳答案
我认为您的第二种方法是可行的方法,您可以使用 data.table
做到这一点。或 dplyr
.
这里使用 data.table
的几个步骤.首先,如果您的数据框是 abc
, def
, ...
做:
DF <- do.call(rbind, list(abc,def,...))
data.table
DT <- data.table(DF)
DTres <- DT[,.(A=sum(A, na.rm=T), B=sum(B, na.rm=T), C=mean(C,na.rm=T)),by=name]
data.table
小插图以更好地了解该软件包的工作原理。
关于r - 如何在R中同时合并多个data.frames和sum和average列,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/35007741/
我是一名优秀的程序员,十分优秀!