# NOT RUN {
elog <- cdnow.sample()$elog[, c("cust", "date")]
estimateRegularity(elog, plot = TRUE, method = 'wheat')
estimateRegularity(elog, plot = TRUE, method = 'mle-minka')
estimateRegularity(elog, plot = TRUE, method = 'mle-thom')
estimateRegularity(elog, plot = TRUE, method = 'cv')
# }
Run the code above in your browser using DataLab