# NOT RUN {
# Show the output of the storm simulation, overriding label colours and vertical axis limits.
require(dynatopmodel)
data(brompton)
x11()
with(brompton$storm.run, disp_output(evap=ae*1000,qobs=qobs*1000,
qsim=qsim*1000, rain=rain*1000,
max.q=2, cex.main=1, col.axis="slategrey", las.time=1))
# }
Run the code above in your browser using DataLab