if (FALSE) { # rlang::is_installed("see")
data(ho_et_al)
ho_et_al$condition_c <- build_contrast(ho_et_al$condition,
"Low discrimination",
"High discrimination")
my_model <-
mdt_simple(data = ho_et_al,
IV = condition_c,
DV = hypodescent,
M = linkedfate)
plot_assumptions(my_model)
}
Run the code above in your browser using DataLab