Ero sivun ”Väestön kohdekohtainen ympäristöperäisen haitta-ainealtistumisen ja terveysriskin arviointi” versioiden välillä

Opasnet Suomista
Siirry navigaatioon Siirry hakuun
 
(104 välissä olevaa versiota 6 käyttäjän tekeminä ei näytetä)
Rivi 1: Rivi 1:
{{metodi}}
#REDIRECT[[Väestön kohdekohtainen ympäristöperäisen haitta-ainealtistumisen arviointi]]
 
==Kysymys==
 
Kuinka arvioidaan kohdekohtaisesti väestön ympäristöperäinen altistuminen haitta-aineelle sekä altistumisesta aiheutuva terveysriski?
 
==Vastaus==
 
===Ennakolta määritellyt laskentaparametrit===
 
<t2b index="Parametri,Altistumisreitti,Väliaine,Lyhenne,Yksikkö,Henkilö" obs="Arvo" unit="useita">
Altistumisperiodin pituus|||At|vrk||365
Kehon paino|||Bw|kg|Aikuinen|70
Kehon paino|||Bw|kg|Lapsi|15
Hengitystiheys|Hengitystiet|Ilma|Ir|m3/h|Aikuinen|0.83
Hengitystiheys|Hengitystiet|Ilma|Ir|m3/h|Lapsi|0.32
Oleskeluaika sisätiloissa (keskiarvo altistumsperiodille)|Hengitystiet|Ilma|Ef.indoor|h/vrk|Aikuinen|22.86
Oleskeluaika sisätiloissa (keskiarvo altistumsperiodille)|Hengitystiet|Ilma|Ef.indoor|h/vrk|Lapsi|21.14
Juomaveden kulutus|Ruuansulatuskanava|Juomavesi|Ir|l/vrk|Aikuinen|0.7
Juomaveden kulutus|Ruuansulatuskanava|Juomavesi|Ir|l/vrk|Lapsi|0.2
Altistumistiheys|Ruuansulatuskanava|Juomavesi|Ef|vrk/vuosi||365
Niellyn maa-aineksen määrä|Ruuansulatuskanava|Maaperä|Ir|mg/vrk/ton|Aikuinen|50
Niellyn maa-aineksen määrä|Ruuansulatuskanava|Maaperä|Ir|mg/vrk|Lapsi|150
Maa-aineksen kiinnittyminen iholle|Iho|Maaperä|Soil.ad.skin|mg/cm2/vrk||0.25
Maa-ainekselle altistuvan ihon osuus|Iho|Maaperä|F.skin||Aikuinen|0.05
Maa-ainekselle altistuvan ihon osuus|Iho|Maaperä|F.skin||Lapsi|0.2
Altistumistiheys|Ruuansulatuskanava|Maaperä|Ef|vrk/vuosi||255
Altistumistiheys|Iho|Maaperä|Ef|vrk/vuosi||255
Paikallisten vihannesten kulutus (keskiarvo altistumsperiodille)|Ruuansulatuskanava|Vihannekset|Ir|kg/vrk|Aikuinen|0.011
Paikallisten vihannesten kulutus (keskiarvo altistumsperiodille)|Ruuansulatuskanava|Vihannekset|Ir|kg/vrk|Lapsi|0.006
Paikallisten juuresten kulutus (keskiarvo altistumsperiodille)|Ruuansulatuskanava|Juurekset|Ir|kg/vrk|Aikuinen|0.200
Paikallisten juuresten kulutus (keskiarvo altistumsperiodille)|Ruuansulatuskanava|Juurekset|Ir|kg/vrk|Lapsi|0.100
Paikallisten marjojen kulutus (keskiarvo altistumsperiodille)|Ruuansulatuskanava|Marjat|Ir|kg/vrk|Aikuinen|0.022
Paikallisten marjojen kulutus (keskiarvo altistumsperiodille)|Ruuansulatuskanava|Marjat|Ir|kg/vrk|Lapsi|0.018
Altistumistiheys|Ruuansulatuskanava|Vihannekset|Ef|vrk/vuosi||365
Altistumistiheys|Ruuansulatuskanava|Juurekset|Ef|vrk/vuosi||365
Altistumistiheys|Ruuansulatuskanava|Marjat|Ef|vrk/vuosi||365
Peseytymiseen kuluva aika|Iho|Pesuvesi|Ed|h/vrk|Aikuinen|0.25
Peseytymiseen kuluva aika|Iho|Pesuvesi|Ed|h/vrk|Lapsi|0.25
Altistumistiheys|Iho|Pesuvesi|Ef|vrk/vuosi|Aikuinen|365
Altistumistiheys|Iho|Pesuvesi|Ef|vrk/vuosi|Lapsi|365
Pesuvedelle altistuvan ihon osuus|Iho|Pesuvesi|F.skin||Aikuinen|1
Pesuvedelle altistuvan ihon osuus|Iho|Pesuvesi|F.skin||Lapsi|1
Uidessa niellyn pintaveden määrä|Ruuansulatuskanava|Pintavesi|Ir|l/uintivrk|Aikuinen|0.05
Uidessa niellyn pintaveden määrä|Ruuansulatuskanava|Pintavesi|Ir|l/uintivrk|Lapsi|0.05
Uintikerran kesto|Iho|Pintavesi|Ed|h/uintikerta|Aikuinen|0.25
Uintikerran kesto|Iho|Pintavesi|Ed|h/uintikerta|Lapsi|0.25
Altistumistiheys|Ruuansulatuskanava|Pintavesi|Ef|vrk|Aikuinen|30
Altistumistiheys|Ruuansulatuskanava|Pintavesi|Ef|vrk|Lapsi|30
Altistumistiheys|Iho|Pintavesi|Ef|vrk|Aikuinen|30
Altistumistiheys|Iho|Pintavesi|Ef|vrk|Lapsi|30
Pintavedelle altistuvan ihon osuus|Iho|Pintavesi|F.skin||Aikuinen|1
Pintavedelle altistuvan ihon osuus|Iho|Pintavesi|F.skin||Lapsi|1
</t2b>
 
===Mallifunktio===
 
<rcode name="answer" include="page:OpasnetBaseUtils|name:generic">
 
library(OpasnetBaseUtils)
library(xtable)
 
 
page <- "Op_fi2814"
 
#Kokonaissaanti <- function(page, C.dw, Ir.dw, Ef.dw, Bw, At){
data <- op_baseGetData("opasnet_base", page)
data <- tidy(data)
 
 
#Ruuansulatuskanava
 
data.rsk <- data[data$Altistumisreitti == "Ruuansulatuskanava",]
 
 
Ir <- data.rsk[data.rsk$Lyhenne == "Ir",]
 
Ef <- data.rsk[data.rsk$Lyhenne == "Ef",]
 
Ef
 
 
 
</rcode>
 
===Arvioinnin tulos===
 
<rcode include="page:OpasnetBaseUtils|name:generic|page:Väestön_kohdekohtainen_ympäristöperäisen_haitta-ainealtistumisen_ja_terveysriskin_arviointi|name:answer"
variables="
name:C.air.outdoor|default:0.5|description:Haitta-aineen pitoisuus ulkoilmassa (µg/m3)|
name:C.air.indoor|default:0.5|description:Haitta-aineen pitoisuus sisäilmassa (µg/m3)|
name:C.dw|default:100|description:Haitta-aineen pitoisuus juomavedessä (mg/l)|
name:C.soil|default:1000|description:Haitta-aineen pitoisuus maaperässä (mg/kg)|
name:C.lfc|default:5|description:Haitta-aineen pitoisuus vihanneksissa (mg/kg tuorepainoa)|
name:C.tfc|default:5|description:Haitta-aineen pitoisuus juureksissa (mg/kg tuorepainoa)|
name:C.berries|default:5|description:Haitta-aineen pitoisuus marjoissa (mg/kg tuorepainoa)|
name:C.bw|default:0.5|description:Haitta-aineen pitoisuus pesuvedessä (mg/l)|
name:C.sw|default:0.5|description:Haitta-aineen pitoisuus pintavedessä (mg/l)|
name:TDI|default:100|description:Turvallisen päivittäisen saannin viitearvo (µg/kg/d)
">
 
library(OpasnetBaseUtils)
library(xtable)
 
#juomavesi(page, C.dw, Ir.dw, Ef.dw, Bw, At)
 
 
#Intake.dw <- juomavesi(page, C.dw, Ir.dw, Ef.dw, Bw, At)
#print(xtable(Intake.dw), type = 'html')
 
C.dw
 
</rcode>

Nykyinen versio 21. maaliskuuta 2013 kello 09.32