# \donttest{
# In RMarkdown setup chunk:
library(maidr)
maidr_on()
# Now all plots render as accessible MAIDR widgets
library(ggplot2)
ggplot(mtcars, aes(x = factor(cyl))) +
geom_bar()
barplot(table(mtcars$cyl))
# }
Run the code above in your browser using DataLab