plotWaterBalance: Plot components of the urban water balance

In CityWaterBalance: Track Flows of Water Through an Urban System

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)

Example output

[1] "WARNING:  CSO volumes greater than runoff + sewage"
[1] "Internal balance:  215.85"
[1] "Global balance:  656.17"
[1] "State variable balances:"
     sw     css     sgw     dgw     pot    npot     pur     ind     wtp 
 288.23 -132.01  -13.30  -54.51    0.00    0.00    0.00    0.00    0.00 

CityWaterBalance documentation built on May 2, 2019, 6:32 a.m.