# NOT RUN {
library("ggplot2")
library("pander")
p <- ggplot(mtcars, aes(x = mpg, y = wt)) +
geom_point()
p + theme_pander()
panderOptions('graph.grid.color', 'red')
p + theme_pander()
p <- ggplot(mtcars, aes(wt, mpg, colour = factor(cyl))) +
geom_point()
p + theme_pander() + scale_color_pander()
ggplot(mpg, aes(x = class, fill = drv)) +
geom_bar() +
scale_fill_pander() +
theme_pander()
# }
Run the code above in your browser using DataLab