detreeexp2_7.m

支持向量机工具箱

global resubcost cost secost ntermnodes bestlevel tree
global WM Model_Year
%--------------------------------------------------------------------------
% COST = TREETEST(T,'resubstitution')函数计算决策树T的代价并返回值到COST

 % 运用回代方法计算代价
resubcost = treetest(tree,'resub');

% 返回secost变量
% secost变量含有每个代价的标准误差
% 其中cost变量为交叉确认得到的代价
[cost,secost,ntermnodes,bestlevel] = treetest(tree,'cross',WM(:,1:2),Model_Year);

% cost用直线表示 resucost用虚线表示
plot(ntermnodes,cost,'g-', ntermnodes,resubcost,'b-.')

%显示离散值
figure(gcf);
xlabel('叶结点数量');
ylabel('代价 (错误分类误差)');
legend('交叉确认法','回代法');