%выводит на один рисунок график исходного ряда, 4-го момента и 5-го момента
%g_data - результат выполнения функции dwwar

function [ output_args ] = plots7(g_data)
%g_data=ans;
wdata=g_data.ss6(g_data.ss7+1:length(g_data.ss6)-1,:);
xxt=num2str(wdata);
[rw,cw]=size(wdata);
jj=1;
for ii=1:rw-1
 if strncmpi(xxt(ii,:),xxt(ii+1,:),4)==0 
  xxt1(jj,1:4)=xxt(ii+1,1:4);
  xxt2(jj)=ii+1;
  jj=jj+1;
end
end

figure(7)
%colormap(gray);
subplot(3,1,1); 
plot(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:),'LineWidth',2); grid on
[wr,wc]=size(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:));
XMIN=0; YMIN=min(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:))-1; 
XMAX=wr; YMAX=max(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:))+1;
axis([XMIN XMAX YMIN YMAX])
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Time, years','FontSize',14,'FontName','Times New Roman');
ylabel('Price','FontSize',14,'FontName','Times New Roman');

subplot(3,1,2); 
mesh(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('\sigma^4','FontSize',14,'FontName','Times New Roman');


subplot(3,1,3); 
mesh(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('\sigma^5','FontSize',14,'FontName','Times New Roman');

figure(1)
%colormap(gray);
 
plot(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:),'LineWidth',2); grid on
[wr,wc]=size(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:));
XMIN=0; YMIN=min(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:))-1; 
XMAX=wr; YMAX=max(g_data.ss2(g_data.ss7+1:length(g_data.ss6),:))+1;
axis([XMIN XMAX YMIN YMAX])
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Time, years','FontSize',14,'FontName','Times New Roman');
ylabel('Price','FontSize',14,'FontName','Times New Roman');

figure(2)
mesh(g_data.ss3(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss3(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss3(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss3(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('Coefs','FontSize',14,'FontName','Times New Roman');

figure (3)
mesh(g_data.ss(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('\sigma^2','FontSize',14,'FontName','Times New Roman');

figure (4)
mesh(g_data.ss1(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss1(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss1(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss1(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('\sigma^3','FontSize',14,'FontName','Times New Roman');

figure (5)
mesh(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss4(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('\sigma^4','FontSize',14,'FontName','Times New Roman');

figure ()
mesh(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6)))
[wr,wc]=size(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6)));
XMIN=0; YMIN=0; ZMIN=min(min(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6))));
XMAX=wc; YMAX=wr;ZMAX=max(max(g_data.ss5(:,g_data.ss7+1:length(g_data.ss6))));
axis([XMIN XMAX YMIN YMAX ZMIN ZMAX]);
set(gca,'XTick',xxt2)
set(gca,'XTickLabel',xxt1)

xlabel('Times, days','FontSize',14,'FontName','Times New Roman'); 
ylabel('Scale','FontSize',14,'FontName','Times New Roman'); 
zlabel('\sigma^5','FontSize',14,'FontName','Times New Roman');



