# NOT RUN {
# load diamonds dataset from ggplot2
require(ggplot2)
data(diamonds)
tab <- tableplot(diamonds)
plot(tab, title="Shine on you Crazy Diamond!!!",
fontsize=12,
legend.lines=7,
fontsize.title=16)
# }
Run the code above in your browser using DataLab