library(ggplot2)

td <- tidy(x, conf.int = TRUE)
ggplot(td, aes(estimate, term, color = term)) +
    geom_point() +
    geom_errorbarh(aes(xmin = conf.low, xmax = conf.high)) +
    geom_vline() +
    ggtitle("Coefficient plot, with 95% confidence intervals")


hilaryparker/explainr documentation built on May 17, 2019, 3:58 p.m.