ENnextQ | R Documentation |
Advances WQ simulation to start of the next hydraulic time period.
ENnextQ()
seconds until next hydraulic event occurs or 0 if at the end of the simulation period.
inp <- file.path( find.package("epanet2toolkit"), "extdata","Net1.inp")
ENopen( inp, "Net1.rpt")
ENsolveH()
ENsetqualtype("EN_CHEM", "Chlorine", "mg/L", "")
ENopenQ()
ENinitQ(0)
ENrunQ()
ENnextQ()
ENrunQ()
ENcloseQ()
ENclose()
# clean-up the created files
file.remove("Net1.rpt")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.