Improve the standard ggplot2 plot! Increase text size, get rid of the grey background!!!

ggplot2_IMPROVE.R

## library(devtools)
## source_gist(7489113)
## use like this:  ggplot(mtcars, aes(x=hp, y=mpg)) + geom_point(aes(col=factor(cyl)), size=3) + t1

t1 <- theme(
  plot.background = element_blank(), 
  panel.grid.major = element_blank(), 
  panel.grid.minor = element_blank(), 
  panel.border = element_blank(), 
  panel.background = element_blank(),
  axis.line = element_line(size=0.5),
  axis.ticks = element_line(size=0.5),
  axis.text = element_text(color='black', size=14),
  axis.title.x = element_text(face="bold", color="black", size=16),
  axis.title.y = element_text(face="bold", color="black", size=16),
  plot.title = element_text(face="bold", color = "black", size=18)
)