Drinking water treatment efficiency

This page is a knowledge crystal of subtype variable. The page identifier is Op_en7954
Moderator:Heta (see all)

Upload data {{#opasnet_base_link:Op_en7954}}

Question

How efficient is microbiological treatment (reported as log-decrease) as used in most common Finnish water treatment processes?

Answer

+ Show code - Hide code

library(OpasnetUtils)

objects.latest("Op_en7954", code_name = "variable")
oprint(TreatmentEfficiency)

Rationale

Data

**Microbiological cleansing as log-decrese**
Water treatment method	Pathogen
	Campylobacteri	E.coli O157:H7	Rotavirus	Norovirus	Cryptosporidium	Giardia
Coagulation and flotation	^[1]	Cite error: Closing `</ref>` missing for `<ref>` tag	^[2]

Water treatment processes

Coagulation/Flotation

Coagulation works well

Enhanced coagulation

Sand filtration

Limestone filtration

Active carbon filtration

Drinking water treatment efficiency(log-decrease)
Obs	TreatmentMethod	Pathogen	Unit	Result
1	Coagulation and flotation	campylobacter	Logdecrease	1.5(0.6-3.7)
2	Coagulation and flotation	E.coli O157:H7	Logdecrease	2.46(1.88-3.14)
3	Coagulation and flotation	rotavirus	Logdecrease	3.99(2.57-5.19)
4	Coagulation and flotation	norovirus	Logdecrease	3.99(2.57-5.19)
5	Coagulation and flotation	cryptosporidium	Logdecrease	1.5(0.6-3.7)
6	Coagulation and flotation	giardia	Logdecrease	3.4
7	Slow sand filtration	campylobacter	Logdecrease	2.7
8	Slow sand filtration	E.coli O157:H7	Logdecrease	2.7
9	Slow sand filtration	rotavirus	Logdecrease	2.2
10	Slow sand filtration	norovirus	Logdecrease	2.2
11	Slow sand filtration	cryptosporidium	Logdecrease	4.8
12	Slow sand filtration	giardia	Logdecrease	4.9
13	Limestone filtration	campylobacter	Logdecrease	0
14	Limestone filtration	E.coli O157:H7	Logdecrease	0
15	Limestone filtration	rotavirus	Logdecrease	0
16	Limestone filtration	norovirus	Logdecrease	0
17	Limestone filtration	cryptosporidium	Logdecrease	0
18	Limestone filtration	giardia	Logdecrease	0
19	Active carbon filtration	campylobacter	Logdecrease	0
20	Active carbon filtration	E.coli O157:H7	Logdecrease	0
21	Active carbon filtration	rotavirus	Logdecrease	0
22	Active carbon filtration	norovirus	Logdecrease	0
23	Active carbon filtration	cryptosporidium	Logdecrease	1.1
24	Active carbon filtration	giardia	Logdecrease	2
25	None	campylobacter	Logdecrease	0
26	None	E.coli O157:H7	Logdecrease	0
27	None	rotavirus	Logdecrease	0
28	None	norovirus	Logdecrease	0
29	None	cryptosporidium	Logdecrease	0
30	None	giardia	Logdecrease	0

Calculations

+ Show code - Hide code

# This is code "Op_en7954/treatmentchoice" on page [[Drinking water treatment efficiency]]
library(OpasnetUtils)

Treatment <- Ovariable("Treatment", data=data.frame(TreatmentMethod=c("Traditional cleaning",
                                                                      "Well working cleaning",
                                                                      "Enhanced cleaning",
                                                                      "Slow sand filtration",
                                                                      "Limestone filtration",
                                                                      "Active carbon filtration",
                                                                      "UV",
                                                                      "Ozonization"
                                                                      ), 
                                                    Result=1)
)

objects.store(Treatment)
cat("Ovariable Treatment saved. \n")

Saves the data on the page

+ Show code - Hide code

# This is code "Op_en7954/treatmentefficiencyall" on page [[Drinking water treatment efficiency]]
library(OpasnetUtils)

TreatmentEfficiencyAll <- Ovariable(name = "TreatmentEfficiencyAll", ddata = "Op_en7954")

objects.store(TreatmentEfficiencyAll)
cat("Ovariable TreatmentEfficiencyAll saved.\n")

Cuts the data form the page to only include chosen treatment methods.

+ Show code - Hide code

# This is code "Op_en7954/variable" on page [[Drinking water treatment efficiency]]
library(OpasnetUtils)

TreatmentEfficiency <- Ovariable("TreatmentEfficiency",
                                 dependencies=data.frame(
                                   Name = c("TreatmentEfficiencyAll", "Treatment"),
                                   Ident = c("Op_en7954/treatmentefficiencyall", "Op_en7954/treatmentchoice")
                                 ),
                                 formula = function(...){
                                   return(TreatmentEfficiencyAll*Treatment)
                                 }
)

objects.store(TreatmentEfficiency)
cat("Ovariable TreatmentEfficiency saved. \n")

References

↑ Cite error: Invalid <ref> tag; no text was provided for refs named honka
↑ Hijnen, W. A., Suylen, G. M. H., Bahlman, J. A., Brouwer‐Hanzens, A. and Medema, G. J. (2010). "GAC adsorption filters as barriers for viruses, bacteria and protozoan (oo)cysts in water treatment." Water research 44: 1224‐123

[honka-1] Cite error: Invalid <ref> tag; no text was provided for refs named honka

[hijnen2010-2] Hijnen, W. A., Suylen, G. M. H., Bahlman, J. A., Brouwer‐Hanzens, A. and Medema, G. J. (2010). "GAC adsorption filters as barriers for viruses, bacteria and protozoan (oo)cysts in water treatment." Water research 44: 1224‐123

[1]

[2]

Drinking water treatment efficiency

Contents

Question

Answer

Rationale

Data

Calculations

See also

References

Navigation menu