DaveM@2: tic
DaveM@2: rng(1945,'twister')
DaveM@2: options = statset('UseParallel', true);
DaveM@8: b = TreeBagger(50, data, labels,'OOBVarImp','On', 'SampleWithReplacement', 'Off', 'FBoot', 0.632, 'Options', options);
DaveM@8: % b = TreeBagger(500, DataTrain63, LabelsTrain,'OOBVarImp','On', 'SampleWithReplacement', 'Off', 'InBagFraction', 0.632, 'Options', options);
DaveM@2: toc
DaveM@2: figure
DaveM@2: plot(oobError(b))
DaveM@2: oobErr = oobError(b);
DaveM@2: xlabel('Number of Grown Trees')
DaveM@2: ylabel('Out-of-Bag Classification Error')
DaveM@2: figure
DaveM@2: bar(b.OOBPermutedVarDeltaError)
DaveM@2: xlabel 'Feature Number'
DaveM@2: ylabel 'Out-of-Bag Feature Importance'
DaveM@2: FI = b.OOBPermutedVarDeltaError;
DaveM@2: r = corrcoef(NormXtrain);
DaveM@2: figure
DaveM@2: imagesc(abs(r))
DaveM@2: NormXtrainOld = NormXtrain;
DaveM@2: idxvarOld = idxvar;
DaveM@2: FeatureNamesOld = FeatureNames;
DaveM@2: oobErrOld = oobErr;