Create ch6-paretoanalysis.R