Failed to fetch fork details. Try again later.
-
Delaigue Olivier authored60219b28
Forked from
HYCAR-Hydro / airGR
Source project has a limited visibility.
## load of catchment data
require(airGR)
## preparation of the initial time series data frame at the daily time-step
data(L0123002)
TabSeries <- data.frame(BasinObs$DatesR,BasinObs$P,BasinObs$E,BasinObs$T,BasinObs$Qmm)
TimeFormat <- "daily"
## conversion at the monthly time-step
NewTimeFormat <- "monthly"
ConvertFun <- c("sum","sum","mean","sum")
NewTabSeries <- SeriesAggreg(TabSeries=TabSeries,TimeFormat,NewTimeFormat,ConvertFun)
## conversion at the yearly time-step
NewTimeFormat <- "yearly"
ConvertFun <- c("sum","sum","mean","sum")
NewTabSeries <- SeriesAggreg(TabSeries=TabSeries,TimeFormat,NewTimeFormat,ConvertFun)