Приложение б

n=1:50; ;% объем выборки

maxlags=35;% макс. значение лага для расчета кор. функции

for i=1:3

x(n)=x1(n,i);% берем очередную выборку

[c,lags] = xcov(x,maxlags,'coeff');% рассчитываем кор. функцию

%c=c/c(maxlags+1);% нормируем кор. функцию

subplot(3,2,2*i-1);

plot(n,x);% строим график процесса

grid on;

set(get(gcf,'CurrentAxes'),'FontName','Times New Roman Cyr','FontSize',12);

title('\bfГрафик процесса');

subplot(3,2,2*i);

plot(lags,c);% строим график корреляционной функции

grid on;

set(get(gcf,'CurrentAxes'),'FontName','Times New Roman Cyr','FontSize',12);

title('\bfАвтокорреляционная функция');

end;