CityWaterBalance (version 0.1.0)

plotWaterBalance: Plot components of the urban water balance

Description

This function plots input to or output from `CityWaterBalance`.

Usage

plotWaterBalance(data, yl = "Your y-axis label", annual = FALSE)

Arguments

data

xts or zoo object

yl

y-axis label

annual

flag indicating whether to plot annual totals

Value

plot

Examples

global_flows <- cwb_data[,c(1,2,4,5)]
plotWaterBalance(global_flows)
p <- list("interc" = 0,"et_mult" = 1,"flow_mult" = 1,"open_wat" = 0.02, 
   "run_mult" = 3.378, "run_css" = 0.35, "bf_mult" = 1, "nonrev"=0.08,
   "ind_evap"=0.012,"wast_gen" = 0.85,"pot_atm" = 0.13,"npot_infilt" = 0.5,
   "slud_evap" = 0,"leak_css" = 0.05,"dgw" = 0.5, "dgw_rep" = 0.5)
m <- CityWaterBalance(cwb_data,p)
f <- m$all_flows
css_flows <- f[,c(3,12,27,30,34)]
plotWaterBalance(css_flows)