fig122.m

realize analysis and design for computer-controlled system

% Generates Fig 12.2 (predvar)
% Computer Controlled Systems (3rd ed)
% Author: B. Wittenmark
% Last edit: 1997-07-10
% Copyright (c) 1996 by K. J. 舠tr鰉, B. Wittenmark and
% Department of Automatic Control, Lund Institute of
% Technology, Lund, Sweden

newplot;clf
set(gcf,'PaperUnits','centimeters','PaperPosition',[2 2 13 10])
set(gcf,'Units','centimeters','position',get(gcf,'PaperPosition'))

Ms=7;
 
Apol=[1 -1.5 0.7];
Cpol=[1 -0.2 0.5];
[y,x]=dimpulse(Cpol,Apol,25);
y2=y.*y;
vareps=cumsum(y2);
subplot(3,1,1)
plot(vareps,'k.','Markersi',Ms);
axis([0,25,0 15]);
set(gca,'Fontsize',9,'Fontname','NewCenturySchlbk');
set(gca,'xtick',[0 10 20],'ytick',[0 10]);
ylabel('Error variance','Fontsize',9,'Fontname','NewCenturySchlbk')
xlabel('Prediction horizon {\it m}','Fontsize',9,'Fontname','NewCenturySchlbk')