X-Git-Url: https://code.communitydata.science/ml_measurement_error_public.git/blobdiff_plain/fa05dbab6bd2c5db6ed4eccf38cff03bb4fd6683..c066f900d3503951013185f75d1f14436eb042cb:/civil_comments/01_dv_example.R

diff --git a/civil_comments/01_dv_example.R b/civil_comments/01_dv_example.R
index 4092243..c26d640 100644
--- a/civil_comments/01_dv_example.R
+++ b/civil_comments/01_dv_example.R
@@ -36,7 +36,7 @@ compare_dv_models <-function(pred_formula, outcome_formula, proxy_formula, df, s
 print("running first example")
 
 compare_dv_models(pred_formula = toxicity_pred ~ funny*white,
-                  outcome_formula = toxicity_coded ~ funny*white, proxy_formula,
+                  outcome_formula = toxicity_coded ~ funny*white,
                   proxy_formula = toxicity_pred ~ toxicity_coded*funny*white,
                   df=df,
                   sample.prop=0.01,
@@ -46,7 +46,7 @@ compare_dv_models(pred_formula = toxicity_pred ~ funny*white,
 print("running second example")
 
 compare_dv_models(pred_formula = toxicity_pred ~ likes+race_disclosed,
-                  outcome_formula = toxicity_coded ~ likes + race_disclosed, proxy_formula,
+                  outcome_formula = toxicity_coded ~ likes + race_disclosed,KKJ
                   proxy_formula = toxicity_pred ~ toxicity_coded*likes*race_disclosed,
                   df=df,
                   sample.prop=0.01,