# NOT RUN {
## loads data
data("darfur")
## fits model
model <- lm(peacefactor ~ directlyharmed + age + farmer_dar + herder_dar +
pastvoted + hhsize_darfur + female + village, data = darfur)
## sensitivity stats for directly harmed
sensitivity_stats(model, treatment = "directlyharmed")
## you can also pass the numeric values directly
sensitivity_stats(estimate = 0.09731582, se = 0.02325654, dof = 783)
# }
Run the code above in your browser using DataLab