powered by
theme_nothing(base_size=12)
library(ggplot2) df <- expand.grid(x = 1:100,y = 1:100)[sample(100^2,.75*100^2),] qplot(x, y, data = df, geom = 'tile') qplot(x, y, data = df, geom = 'tile') + theme_nothing()
Run the code above in your browser using DataLab