A1=input('Enter Amplitude1(ask)=');
A2=input('Enter Amplitude2(ask)=');
mh=abs(hilbert(noise2));
rn=4;
cr=zeros(rn,1);
rsrn=zeros(rn);
for ii=0:rn;
cr(ii+1)=noise2(1:length(noise2)-ii)*noise2(ii+1:length(noise2))'/length(noise2)-ii;
end
for o=1:rn;
for g=1:rn;
rsrn(o,g)=cr(abs(o-g)+1);
end
end
[s,b]=eig(rsrn);
sb2=b(4,4)-b(1,1)-b(2,2)-b(3,3);
pm=10*log10(sb2);
m2j=moment(mh,4)-2*((moment(mh,2)).^2)/4*(pm.^2);