Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/83.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R中,如何用群的平均值替换NA值?_R_Replace_Na - Fatal编程技术网

在R中,如何用群的平均值替换NA值?

在R中,如何用群的平均值替换NA值?,r,replace,na,R,Replace,Na,我有两个数据帧,第一个(dat)有两列group和value。第二个数据帧(dat2)具有每个组的平均值。如何将dat中的NA值替换为dat2中组的平均值 library(dplyr) x <- as.data.frame(seq(from = 1, to = 10, by = 1)) names(x)[1] <- "value" y <- as.data.frame(c("A","A","A","A","A","B","B","B","B","B"),1) names(y)

我有两个数据帧,第一个(
dat
)有两列
group
value
。第二个数据帧(
dat2
)具有每个
组的平均值。如何将
dat
中的NA值替换为
dat2
中组的平均值

library(dplyr)

x <- as.data.frame(seq(from = 1, to = 10, by = 1))
names(x)[1] <- "value"
y <- as.data.frame(c("A","A","A","A","A","B","B","B","B","B"),1)
names(y)[1] <- "group"

dat <- cbind(y,x)

dat[dat == 3] <- NA
dat[dat == 7] <- NA

dat2 <- dat %>%
  group_by(group) %>%
  summarise_at(.vars = names(.)[2],.funs = c(mean="mean"),na.rm=TRUE)
库(dplyr)
这个怎么样

库(dplyr)
x