ERFs of vitamins

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

Upload data {{#opasnet_base_link:Op_en6866}}

Question

What are exposure-response functions to vitamins?

Answer

+ Show code - Hide code

#This is code Op_en6866/ on page [[ERFs of vitamins]]

library(OpasnetUtils)
objects.latest("Op_en6866", code_name="initiate")
ERF_vit <- EvalOutput(ERF_vit)
threshold_vit <- EvalOutput(threshold_vit)

cat("ERF_vit\n")
oprint(summary(ERF_vit))
cat("threshold_vit\n")
oprint(summary(threshold_vit))

Rationale

Data

Response metric: 1 if the recommendation is not met, 0 if it is met.

ERFs of vitamins(-)
Obs	Exposure agent	Response	Exposure	Exposure unit	ER function	Scaling	Threshold	ERF	Description
1	Vitamin D	Vitamin D recommendation	Daily intake	ug /d	Step	None	10	100	Finnish nutrition recommendations 2014

Finnish nutrition recommendations 2014^[1]

Calculations

+ Show code - Hide code

# This is code Op_en6866/initiate on page [[ERFs of vitamins]]

library(OpasnetUtils)

d <- opbase.data("Op_en6866")[-1] #Remove Obs
colnames(d) <- gsub(" ", "_", colnames(d))
d$Result <- ifelse(d$Result == "", "0", as.character(d$Result))

ERF_vit <- Ovariable("ERF_vit", data = d[d$Observation == "ERF", colnames(d) != "Observation"])

threshold_vit <- Ovariable("threshold_vit", data = d[d$Observation == "Threshold", colnames(d) != "Observation"])

objects.store(ERF_vit, threshold_vit)
cat("Ovariables ERF_vit, threshold_vit stored.\n")

References

↑ Valtion ravitsemusneuvottelukunta. Suomalaiset ravitsemussuositukset 2014. [Finnish nutrition recommendations 2014] [1]

[1] Valtion ravitsemusneuvottelukunta. Suomalaiset ravitsemussuositukset 2014. [Finnish nutrition recommendations 2014] [1]

[1]

ERFs of vitamins

Contents

Question

Answer

Rationale

Data

Calculations

See also

References

Navigation menu