# NOT RUN {
data("mpg", package = "ggplot2")
apex(mpg, aes(manufacturer)) %>%
ax_plotOptions(
bar = bar_opts(
endingShape = "rounded",
columnWidth = 100,
distributed = TRUE
)
)
# }
Run the code above in your browser using DataLab