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