Training exposure

This page is a knowledge crystal of subtype variable. The page identifier is Op_en5674
Moderator:Jouni (see all)
This page is a stub. You may improve it into a full page.
Upload data {{#opasnet_base_link:Op_en5674}}

Question

What is the exposure in the Training assessment?

Answer

+ Show code- Hide code cat("Initiation successful. Now starting the model.\n") out <- make.ovariable( name = "exposure", data = fetch("Op_en5674"), formula = formula.Op_en5674, dependencies = dependencies.Op_en5674 ) out print(out, iter = 1:5) plot(out)

Rationale

Data

Training exposure: Difference between revisions(-)

Obs	Year	Unit	Result	Description
1	2012	ug/m3	1 - 2
2	2020	ug/m3	10 - 11

Formula

+ Show code- Hide code microenvironment.concentration <- data.frame( Microenvironment = c("Home", "Other"), Unit = "ug/m3", Result = c("1-2", "6-8") ) microenvironment.time <- data.frame( Microenvironment = c("Home", "Other"), Unit = "fraction", Result = c(0.7, 0.3) ) dependencies.Op_en5674 <- data.frame( Name = "", Identifier = "", Direction = "", Result = c("microenvironment.concentration", "microenvironment.time") ) formula.Op_en5674 <- function(x) { out <- make.ovariable(fetch(x[1, "Result"])) * make.ovariable(fetch(x[2, "Result"])) out <- tapply(out, out@sample[c("Iter", "Unit")], sum) return(out) }

Related files

<mfanonymousfilelist></mfanonymousfilelist>