powered by
theme_xkcd()
p <- ggplot() + geom_point(aes(mpg, wt), data=mtcars) + theme_xkcd() p
Run the code above in your browser using DataLab