# NOT RUN {
amHist(x = rnorm(100))
# }
# NOT RUN {
# Other examples available which can be time consuming depending on your configuration.
x <- replicate(1000, {
if (round(runif(1))) {
rnorm(1)
} else {
rnorm(1, mean = 5)
}
})
# Without plot
amHist(x = x, plot = FALSE)
# With options
amHist(x = x, border = "blue")
amHist(x = x, col = "lightblue", control_hist = list(breaks = 100))
amHist(x = x, col = "grey")
amHist(x = x, col = "gray")
amHist(x = x, main = "Histogram", ylab = "y-axis", xlab = "x-axis", col = "red")
amHist(x = x, main = "Histogram", ylab = "y-axis", xlab = "x-axis", ylim = c(10, 15))
amHist(x = x, main = "Histogram", ylab = "y-axis", xlab = "x-axis")
# Options for computing the histogram
amHist(x = x, control_hist = list(breaks = "Scott"))
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab