ploterrorbar.m

这是一个支持向量机的工具

function [ft,fd]=ploterrorbar(ind,errs,x,xname,pcolor,subp)
% plotting result
sw=['Plotting of Error Bar'];
if pcolor c(1)='r';c(2)='b';c(3)='m';c(4)='g'; c(5)='y'; c(6)='k';
else c(1)='k';c(2)='k';c(3)='k';c(4)='k'; c(5)='k'; c(6)='k';end

if subp==0 figure('name',sw,'numbertitle','off','color','white');end
[fd,ts]=max(max(ind+errs));
[ft,ts]=min(min(ind-errs));
ts=(fd-ft)*0.1;
ps=size(ind,1);

if subp>0 subplot(2,2,subp);cla; end 
for i=1:ps
  errorbar(x,ind(i,:),errs(i,:),c(i));hold on;
end

ft=ft-ts; fd=fd+ts+ts;
ylim([ft fd]);
ft=min(x)-0.2;
fd=max(x)+0.2;
xlim([ft fd]);
legend('linear regression','GcLearn LinearRegress','epsilon-SVR','GcLearn epsilon-SVR',2);
xlabel('Noise Variance','FontSize',11,'FontWeight','demi');
ylabel('Prediction Error','FontSize',11,'FontWeight','demi');
title(['Results for ' xname]);