# NOT RUN {
# load data
data("Eredivisie")
# log-transform market values
Eredivisie$logMarketValue <- log(Eredivisie$MarketValue)
# plot histogram of log market values
histogram(Eredivisie, "logMarketValue", normal = TRUE,
limits = list(x = c(9.5, 17.5)))
# }
Run the code above in your browser using DataLab