# \donttest{
# Creating theme for ggplot2 graph using default arguments
library(ggplot2)
fig_raw <- ggplot() +
geom_col(data = mtcars, aes(x = hp , y = mpg, fill = cyl)) +
theme_ipea()
# Save ggplot output
save_pdf(fig_raw,file.name = paste0(tempdir(),"/figura.pdf"))
# }
Run the code above in your browser using DataLab