powered by
plotadd(FUN, ..., add.stuff = expression())
FUN
playwith
if (interactive()) { x <- rnorm(64) plot(x, x^2, cex=2) rug(x) grid() # do it all in one call with plotadd plotadd(plot, x, x^2, cex=2, add.stuff=expression(rug(x), grid())) }
Run the code above in your browser using DataLab