動物園とtapplyは

Question

木材は、私が個別に各町のための私のデータの季節の平均値（平均）を取得したい私のデータフレーム

town date prec  TP  TC 
TR 1/10/1983 NaN  NaN 11.34 
CR 2/12/1983 NaN  NaN 4.3 
TR 3/12/1983 11.22 11.36 NAN 
SP 5/6/1985 NaN  NaN 3.2 
BM 6/7/1994 6.33  6.23 1.2 
BM 5/6/1995 5.81  5.9 NAN 
BM 1/11/2005 5.9  5.9 6.2 

です。過去に私は動物園の機能を使って、1年あたりの季節平均を求めました。しかし、動物園は町の別の変数を受け入れるのは苦労しています。 は今、私は1985

ため、だから、1983年のための 月2月の行進の平均と

月、6月のために年間 あたりの町で「PREC、TP、TC」の季節の平均を見つけるために、7月の平均それを拡張したいです出力はそのように見えるはずです。また、「RはNANを0にしてはいけません」それはちょうど欠けているデータです。

town date  prec TP  TC 
TR 1983 11.22 11.36 7.82 
SP 1985  6.07 6.07 2.2 

Answer 1

library(data.table) 
library(lubridate)  
setDT(dat) 
dat[ , .(prec = mean(prec, na.rm = T), TP = mean(TP, na.rm = T), TC = mean(TC, na.rm = T))., by = .(town, year(date))]