data("darfur")
model <- lm(peacefactor ~ directlyharmed + age + farmer_dar + herder_dar +
pastvoted + hhsize_darfur + female + village, data = darfur)
group_partial_r2(model, covariates = c("female", "pastvoted"))
Run the code above in your browser using DataLab