Open pcp2117 opened 1 year ago
Hi --
I found what I think is a pretty simple error in measurement_error.R. In the following block of code, $lwr is incorrectly written into upr:
if ('upr' %in% names(extra_opts)) { upr <- extra_opts$lwr } else { upr <- 0.75 }
Suggest the following quick fix: upr <- extra_opts$lwr -----------> upr <- extra_opts$upr
Hi --
I found what I think is a pretty simple error in measurement_error.R. In the following block of code, $lwr is incorrectly written into upr:
if ('upr' %in% names(extra_opts)) { upr <- extra_opts$lwr } else { upr <- 0.75 }
Suggest the following quick fix: upr <- extra_opts$lwr -----------> upr <- extra_opts$upr