X-Git-Url: https://code.communitydata.science/ml_measurement_error_public.git/blobdiff_plain/979dc14b6861ae31f00d56392fd5b8cf69f17333..d0c5766bdf867a81a2477d2cac1d40812110af90:/simulations/irr_simulation_base.R diff --git a/simulations/irr_simulation_base.R b/simulations/irr_simulation_base.R index ebb215b..ee7112a 100644 --- a/simulations/irr_simulation_base.R +++ b/simulations/irr_simulation_base.R @@ -82,7 +82,7 @@ run_simulation <- function(df, result, outcome_formula = y ~ x + z, proxy_formul Bxy.ci.upper.loco.mle = ci.upper['x'], Bxy.ci.lower.loco.mle = ci.lower['x'], Bzy.ci.upper.loco.mle = ci.upper['z'], - Bzy.ci.lower.loco.mle = ci.upper['z'])) + Bzy.ci.lower.loco.mle = ci.lower['z'])) ## print(rater_formula) ## print(proxy_formula)