假设我有以下数据框:
t<-c(1,1,2,4,5,4)
u<-c(1,3,4,5,4,2)
v<-c(2,3,4,5,NA,2)
w<-c(NA,3,4,5,2,3)
x<-c(2,3,4,5,6,NA)
df<-data.frame(t,u,v,w,x)
我想将 NA 替换为代表 NA 前后情况平均值的值,除非一行以 NA 开头(第 4 行)或结束(第 5 行)。当行以 NA 开头时,我想用以下情况替换 NA。当该行以 NA 结尾时,我想用之前的情况替换 NA。
因此,我希望我的输出看起来像:
t<-c(1,1,2,4,5,4)
u<-c(1,3,4,5,4,2)
v<-c(2,3,4,5,3.5,2)
w<-c(3,3,4,5,2,3)
x<-c(2,3,4,5,6,6)
df<-data.frame(t,u,v,w,x)