Nothing
life01 <- c(16, 34, 53, 75, 93, 120, 150, 191, 240, 339)
mean(life01); 1/mean(life01)
qf <- function(x) { qexp(x,1/mean(life01)) }
myplot01 <- qqmath(life01,distribution=qf)
myplot02 <- xqqmath(~life01,distribution=qf,idline=TRUE,qqmathline=FALSE)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.