ecoval-package: Procedures for the Ecological Assessment of Surface Waters

Description Details Author(s) References See Also Examples

Description

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):

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):

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,

Details

Package: ecoval
Type: Package
Version: 1.2.9
Date: 2021-12-10
License: GPL-3
Depends: utility, rivernet, jpeg

Author(s)

Nele Schuwirth <nele.schuwirth@eawag.ch> and Peter Reichert <peter.reichert@eawag.ch> with contributions by Simone Langhans and Christian Michel

Maintainer: Nele Schuwirth <nele.schuwirth@eawag.ch>

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. 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. 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. 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

See Also

utility.

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
# 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)

Example output

Loading required package: utility
Loading required package: rivernet
Loading required package: jpeg

ecoval documentation built on Dec. 11, 2021, 9:40 a.m.