#crab data set with all the observations used as training
pprf.crab <- PPforest(data = crab, std = 'min-max', y = 'Type',
size.tr = 1, m = 100, size.p = .5, PPmethod = 'LDA')
ppf_avg_imp(pprf.crab, 'Type')
Run the code above in your browser using DataLab