add_brackets
draws brackets along the y-axis beyond the plotting area of a dot-and-whisker plot generated by dwplot
, useful for labelling groups of predictors
add_brackets(p, brackets, face = "italic")
A plot generated by dwplot
. Any `ggplot` customization should be done before passing the plot to add_brackets
. To pass the finalized plot to add_brackets
without creating an intermediate object, simply wrap the code that generates it in braces (`{`
and `}`
).
A list of brackets; each element of the list should be a character vector consisting of (1) a label for the bracket, (2) the name of the topmost variable to be enclosed by the bracket, and (3) the name of the bottommost variable to be enclosed by the bracket.
A typeface for the bracket labels; options are "plain", "bold", "italic", "oblique", and "bold.italic".
The function returns a ggplot
object.
# NOT RUN {
library(broom)
library(dplyr)
data(mtcars)
m1 <- lm(mpg ~ wt + cyl + disp, data = mtcars)
two_brackets <- list(c("Engine", "Cylinder", "Displacement"),
c("Not Engine", "Intercept", "Weight"))
{dwplot(m1, show_intercept = TRUE) %>%
relabel_predictors("(Intercept)" = "Intercept",
wt = "Weight",
cyl = "Cylinder",
disp = "Displacement") +
theme_bw() + xlab("Coefficient") + ylab("") +
theme(legend.position="none") +
geom_vline(xintercept = 0, colour = "grey50", linetype = 2)} %>%
add_brackets(two_brackets)
# }
Run the code above in your browser using DataLab