powered by
histogram
panel.histogram(x, breaks, equal.widths, type, col, ...)
breaks==NULL
bar.fill$col