R包HydroTSM

如何解决R包HydroTSM

我有1950-2005年的每日降水数据。我想获取带有相应日期的年度最大降水量。在hydroTSM中使用daily2annual（）时，我将日期作为一年的第一天（例如1950-01-01“）。我想获取发生最大降水的日期。我附上代码I使用和我得到的结果。

dat<-read.csv("dailyPrecip.csv",stringsAsFactors= F)
x<-read.zoo(dat,format= "%Y-%m-%d")
z<-daily2annual(x$PRECIP,FUN=max,na.rm = TRUE)
write.csv(z)


"","x"
"1950-01-01",69.1
"1951-01-01",47.7
"1952-01-01",46.2
"1953-01-01",40.6
"1954-01-01",129.3
"1955-01-01",40.9
"1956-01-01",42.7
"1957-01-01",78.5
"1958-01-01",31.8
"1959-01-01",55.6
"1960-01-01",26.2
"1961-01-01",58.9
"1962-01-01",45.1
"1963-01-01",53.1
"1964-01-01",74.7
"1965-01-01",35.1
"1966-01-01",32
"1967-01-01",47.5
"1968-01-01",75.7
"1969-01-01",71.4
"1970-01-01",42.7
"1971-01-01",55.6
"1972-01-01",38.1
"1973-01-01",34.5
"1974-01-01",44.7
"1975-01-01",26.7
"1976-01-01",38.1
"1977-01-01",36.1
"1978-01-01",44.8
"1979-01-01",48
"1980-01-01",72.4
"1981-01-01",41.4
"1982-01-01",47
"1983-01-01",50
"1984-01-01",47
"1985-01-01",49.6
"1986-01-01",49.4
"1987-01-01",37
"1988-01-01",49
"1989-01-01",52
"1990-01-01",45.4
"1991-01-01",32
"1992-01-01",42.6
"1993-01-01",39
"1994-01-01",48
"1995-01-01",62
"1996-01-01",55.8
"1997-01-01",46.4
"1998-01-01",33.5
"1999-01-01",57
"2000-01-01",79.5
"2001-01-01",42
"2002-01-01",32
"2003-01-01",48.1
"2004-01-01",76
"2005-01-01",50

请帮助

谢谢 菲利普（EPhilip）