除了na.rm = TRUE之外，均值返回NaN

Question

樣本數據

date        coins   
2013-10-01  NA      
2013-10-01  NA      
2013-10-01  NA      
2013-11-01  10      
2013-11-01  NA      
2013-11-01  20      
2013-11-01  30      
2013-11-01  40      
2013-12-30  NA      
2013-12-30  22      
2013-12-30  24
2013-12-30  25

我想做的事？

我想計算硬幣列的平均值和中位數，忽略缺失值。

到目前為止我做了什么？

1. 將數據分組到日期變量by_date <- group_by(df, date)
2. 匯總數據使用： by_date %>% summarise_each_(funs(mean(., na.rm = TRUE), median(., na.rm=TRUE)), names(by_date)[2])

問題 summarise_each_返回的結果顯示NaN的日期為2013-10-01 。 這是否意味着該功能不會忽略缺失的值？

Answer 1

這里的問題是2013-10-01的所有值都是NA ，所以沒有平均值。 NaN試圖告訴你這個。

如果您不想在摘要中顯示2013-10-01，那么可以選擇先解決NA值，如下所示：

by_date<-group_by(df[!is.na(df$coins),],date)