## getting an indirect effect index
ho_et_al$condition_c <- build_contrast(ho_et_al$condition,
"Low discrimination",
"High discrimination")
simple_model <- mdt_simple(data = ho_et_al,
IV = condition_c,
DV = hypodescent,
M = linkedfate)
add_index(simple_model)
Run the code above in your browser using DataLab