# Procedures for the Ecological Assessment of Surface Waters Functions for evaluating and visualizing ecological assessment procedures for surface waters. Functions to generate branches (modules) of the assessment value function: Swiss river assessment program and individual modules (MSK, [https://modul-stufen-konzept.ch](https://modul-stufen-konzept.ch)): `msk.create`, `msk.morphol.1998.create`, `msk.hydrol.2011.create`, `msk.physapp.2007.create`, `msk.nutrients.2010.create`, `msk.diatoms.2007.create`, `msk.invertebrates.2010.create`, `msk.fish.2004.create`, `msk.macrophytes.2017.create`. Additional modules in the evaluation state: `val.pesticides.create`, `val.micropoll.create`, `val.heavymetals.create`, `val.spear.create`, `val.invertebrates.create`, Integrative assessment value function considering modules of the Swiss assessment program and modules at the evaluation stage: `ecoval.river.create`, Moduls of the Swiss lake assessment program (see [https://modul-stufen-konzept.ch](https://modul-stufen-konzept.ch)): `lake.morphol.2016.create`, Node names, attribute names and identifiers for attribute levels (if not numeric) can be translated into different languages. See: `ecoval.dict`, `ecoval.translate`, `ecoval.dictionaries.default`, package ## Details ||| |:--|:--| |Package:|ecoval| |Type:|Package| |Version:|1.2.9| |Date:|2021-12-10| |License:|GPL-3| |Depends:|utility, rivernet, jpeg| ## Author(s) Nele Schuwirth and Peter Reichert with contributions by Simone Langhans and Christian Michel Maintainer: Nele Schuwirth ## References Langhans, S.D., Lienert, J., Schuwirth, N. and Reichert, P. How to make river assessments comparable: A demonstration for hydromorphology, Ecological Indicators 32, 264-275, 2013. tools:::Rd_expr_doi("10.1016/j.ecolind.2013.03.027") Langhans, S.D., Reichert, P. and Schuwirth, N. The method matters: indicator aggregation in ecological river assessment. Ecological Indicators 45, 494-507, 2014. tools:::Rd_expr_doi("10.1016/j.ecolind.2014.05.014") Reichert, P., Schuwirth, N. and Langhans, S. Constructing, evaluating and visualizing value and utility functions for decision support, Environmental Modelling & Software 46, 283-291, 2013. tools:::Rd_expr_doi("10.1016/j.envsoft.2013.01.017") Reichert, P., Borsuk, M., Hostmann, M., Schweizer, S., Sporri, C., Tockner, K. and Truffer, B. Concepts of decision support for river rehabilitation, Environmental Modelling and Software 22, 188-201, 2007. [https://modul-stufen-konzept.ch](https://modul-stufen-konzept.ch) ## See Also `utility`. ## Examples ```r # creation of individual modules: morphol <- msk.morphol.1998.create() plot(morphol) hydrol <- msk.hydrol.2011.create() plot(hydrol) physapp <- msk.physapp.2007.create() plot(physapp) nutrients <- msk.nutrients.2010.create() plot(nutrients) micropoll <- val.micropoll.create() plot(micropoll) heavymetals <- val.heavymetals.create() plot(heavymetals) spear <- val.spear.create() plot(spear) diatoms <- msk.diatoms.2007.create() plot(diatoms) invertebrates <- msk.invertebrates.2010.create() plot(invertebrates) fish <- msk.fish.2004.create() plot(fish) # creation of three versions of assessment programs: msk <- msk.create(language="EnglishNodes",col="blue") plot(msk) plot(msk,with.attrib=FALSE) ecoval <- ecoval.river.create(language="EnglishNodes",col="red") plot(ecoval) plot(ecoval,with.attrib=FALSE) beetles_richness <- utility.endnode.parfun1d.create(name.node = "richness", name.attrib = "gb_richness", range = c(0,1), name.fun = "utility.fun.exp", par = c(2,0,1), utility = FALSE) beetles_concordance <- utility.endnode.parfun1d.create(name.node = "concordance", name.attrib = "gb_concordance", range = c(0,1), name.fun = "utility.fun.exp", par = c(1,0,1), utility = FALSE) beetles <-utility.aggregation.create(name.node = "ground beetles", nodes = list(beetles_richness,beetles_concordance), name.fun = "utility.aggregate.add", par = c(0.5,0.5)) ecoval2 <- ecoval.river.create(phys = list(msk.morphol.1998.create), chem = list(msk.nutrients.2010.create, val.pesticides.create, val.heavymetals.create), biol = list(msk.invertebrates.2010.create, msk.fish.2004.create, beetles), language = "EnglishNodes") plot(ecoval2) plot(ecoval2,with.attrib=FALSE) ```

ecoval-package