Usage
plothist(data = rnorm(1000), mybreaks = "Sturges", myxlim = NULL, myylim = NULL,
eightlines = TRUE, eightdigit = 0, eightcex = 0.8, eightcolors = c("red",
"darkgreen", "blue", "black", "purple", "gold")[c(1, 2, 3, 2, 1, 6, 6,
5, 4, 5)], mylegend = "", myxlab = "", return_df = FALSE, show_n = TRUE,
show_skewness = TRUE, show_density = FALSE, show_normline = FALSE, x)