如何在NA填充中的R分組方式值

Question

說我有一個DF，看起來像：

rat let num 
1  A 3 
3  c 12   
3  B 41   
1  B NA   
1  A NA  
2  B 2  
2  C 20   
1  C NA  
2  A 33   
3  C 10 

我想GROUP_BY「老鼠」和「讓」，讓「民的平均'爲每個組，並用它來填寫NA值。

我已經完成了分組，並得到了意思，但不知道如何應用這些值來填充我原始df中的NA值。不同的方法將不勝感激！謝謝。

df %>% group_by(rat,let) %>% summarise(num_avg = mean(num,na.rm=T)) 

Answer 1

這是一種方法。

df <- df %>% group_by(rat,let) %>% mutate(num_avg = mean(num,na.rm=T)) 
df$num[is.na(df$num)] <- df$num_avg[is.na(df$num)] 

Answer 2

這裏是ave和na.aggregate一個選項從zoo

library(zoo) 
df$num <- with(df, ave(num, rat, let, FUN = na.aggregate))