# NOT RUN {
ahist(rnorm(100))
ahist(rnorm(1000))
ahist(rnorm(10000))
ahist(rexp(100))
ahist(rexp(1000))
ahist(rexp(10000))
# }
# NOT RUN {
ahist(rcauchy(1000))
ahist(rcauchy(1000), ival = 0.95)
x <- c(rnorm(400),rnorm(200, mean=6))
ahist(x)
x <- c(rnorm(400),rnorm(200, mean=16))
ahist(x)
x <- c(rnorm(400),rnorm(200, mean=32))
ahist(x)
# }
Run the code above in your browser using DataLab