# NOT RUN {
### generate an 'STB' object without plotting
obj <- stb(rnorm(30), plot=FALSE)
plot(obj)
### manipulate the 'STB' object for plotting
obj$legend=TRUE
plot(obj)
### add a previously generated STB-ocject to an existing plot
plot(sort(rnorm(30)), sort(rnorm(30)))
obj$add <- TRUE
plot(obj)
# }
Run the code above in your browser using DataLab