### Change default unit of y-axis to 'count'
histogram <- function(..., type='count', fit) {
if(!missing(fit)) {
lattice::histogram(..., type = 'density', fit=fit)
} else {
lattice::histogram(..., type = type)
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.