radar4.m

来自「This programme can generate signals of f」· M 代码 · 共 24 行

 
%************************************************************
%radar4
%************************************************************
function R4=radar4(ts,te)
toa4=ts;
i4=1;
ran4=0;
while(toa4<te)
     R4(i4,3)=35+round(10*0.02*randn(1))/10;
     R4(i4,2)=10+round(100*sqrt(2)*0.05*randn(1))/100;
     ran4=ceil(ceil(rand(1)*200)/20);
     if mod(i4,6)==1
         R4(i4,1)=2900+20*ran4+round(10*3*randn(1))/10;
         R4(i4,4)=250+20*ran4+round(10*0.05*randn(1))/10;
     else
         R4(i4,1)=R4((i4-1),1)+round(10*3*randn(1))/10;
         R4(i4,4)=R4((i4-1),4)+round(10*0.05*randn(1))/10;
     end
     R4(i4,5)=toa4;
     toa4=toa4+R4(i4,4);
     R4(i4,6)=4;
     i4=i4+1;
 end