Description Usage Arguments Details Value Author(s) See Also Examples
This routine calculates 10 performance and stramflow indices
1 | perfindices(Po,Qo,Qs,Qb)
|
Po |
observed precipitation [mm/timestep] |
Qo |
observed streamflow [mm/timestep] |
Qs |
simulated streamflow [mm/timestep] |
Qb |
simulated base flow [mm/timestep] |
perfindices() calculates 6 performance measures and 4 catchment descriptors (streamflow-based metrics). It uses simulated and observed streamflow, observed precipitation (to calculate the rainfall-runoff coefficient and streamflow elasticity) and simulated baseflow (to calculate the baseflow index, slope of duration curve, streamflow elastivity).
The 6 performance measures are:
LAGTIME between observed and simulated discharge (from package tiger)
MEAN ERROR between observed and simulated discharge
MEAN ABSOLUTE ORDINAL ERROR between observed and simulated discharge (from package qualV)
Complement to 1 of NASH-SUTCLIFFE EFFICIENCY between observed and simulated discharge (from package qualV)
ROOT MEAN SQUARE ERROR between observed and simulated discharge (from package qualV)
Difference in HIGH PULSE COUNT between observed and simulated discharge
All the above measures tend to zero as Qo approaches Qs.
The 4 catchment descriptors are:
RAINFALL_RUNOFF coefficient (for Qs)
BASEFLOW INDEX (for Qs)
SLOPE of FLOW DURATION CURVE (for Qs)
STREAMFLOW ELASTICITY (for Qs)
The function returns a list of 10 indices.
Claudia Vitolo, Imperial College London; Till Francke, University of Potsdam
runoff_coeff
, fdc_slope
, sel
,codebfi
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | data(modlist)
data(mopex)
# returns the instantaneous runoff
X <- fusesma.sim (fuse.DATA,mid=5,modlist,deltim=1,
states=FALSE,fluxes=TRUE,
fracstate0=0.25,
fuse.parameters$rferr_add,fuse.parameters$rferr_mlt,
fuse.parameters$frchzne,fuse.parameters$fracten,
fuse.parameters$maxwatr_1,fuse.parameters$percfrac,
fuse.parameters$fprimqb,fuse.parameters$qbrate_2a,
fuse.parameters$qbrate_2b,fuse.parameters$qb_prms,
fuse.parameters$maxwatr_2,fuse.parameters$baserte,
fuse.parameters$rtfrac1,fuse.parameters$percrte,
fuse.parameters$percexp,fuse.parameters$sacpmlt,
fuse.parameters$sacpexp,fuse.parameters$iflwrte,
fuse.parameters$axv_bexp,fuse.parameters$sareamax,
fuse.parameters$loglamb,fuse.parameters$tishape,
fuse.parameters$qb_powr)
# returns the routed runoff
Qrout <- fuserouting.sim(X$U, mid=5, modlist, fuse.parameters$timedelay, deltim=1)
Po <- fuse.DATA[,"P"]
Qo <- fuse.DATA[,"Q"]
Qs <- Qrout
Qb <- X$qbase_2
indices <- perfindices(Po,Qo,Qs,Qb)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.