Xt=arsim(0,[1.318 -0.634],289.2,1000);
period=etfe(Xt);
plot(period(2:length(period),1:1),period(2:length(period),2:2),'-',period(2:length(period),1:1),period(2:length(period),2:2),'+');
pause
spec=spa(Xt);
%plot(spec(2:length(spec),1:1),spec(2:length(spec),2:2),'-',spec(2:length(spec),1:1),spec(2:length(spec),2:2),'+')
%pause;
plot(spec(2:length(spec),1:1),spec(2:length(spec),3:3),'-',spec(2:length(spec),1:1),spec(2:length(spec),3:3),'+');
pause;
acf(Xt,length(Xt)-1);
