Creates a value function for river diatoms based on the Swiss modular concept for stream assessment, level I (Regional survey) from 2007.
msk.diatoms.2007.create(language = "English",
dictionaries = NA,
col = "black")
Language to be used to denote nodes, attributes and attribute levels. Must be a column name of the table provided by the second argument.
Matrix of dictionaries with the languages provided by the column names and the original words provided as the row names.
If dictionary is NA, the default dictionary ecoval.dictionaries.default
is loaded.
Color of bounding boxes in objectives hierarchy.
The function returns the value function as a class utility.
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. 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. 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. 10.1016/j.envsoft.2013.01.017 Reichert, P., Langhans, S., Lienert, J. and Schuwirth, N. The conceptual foundation of environmental decision support. Journal of Environmental Management. 154, 316-332, 2015. 10.1016/j.jenvman.2015.01.053 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. 10.1016/j.envsoft.2005.07.017 https://modul-stufen-konzept.ch Huerlimann J., Niederhauser P. Methoden zur Untersuchung und Beurteilung der Fliessgewaesser. Kieselalgen Stufe F (flaechendeckend). Umwelt-Vollzug Nr. 0740. Bundesamt fuer Umwelt, Bern. 130 S., 2007 http://www.bafu.admin.ch/uv-0740-d.
# NOT RUN {
diatoms <- msk.diatoms.2007.create()
plot(diatoms)
diatoms.german <- msk.diatoms.2007.create("Deutsch")
plot(diatoms.german)
# }
Run the code above in your browser using DataLab