radar2.m

This programme can generate signals of five different radars which contains noise.

%***********************************
%radar2
%***********************************
function R2=radar2(ts,te)
i2=1;
toa2=ts;
ran2=0;
while(toa2<te)
    R2(i2,3)=50+round(10*0.02*randn(1))/10;
    if mod(i2,3)==0
       R2(i2,4)=550+round(10*0.05*randn(1))/10;
    elseif mod(i2,3)==1
           R2(i2,4)=680+round(10*0.05*randn(1))/10;
    else
           R2(i2,4)=850+round(10*0.05*randn(1))/10;
    end
    ran2=4*rand(1);
    if ceil(ran2)==1
       R2(i2,2)=10+round(100*sqrt(2)*0.05*randn(1))/100;
    elseif ceil(ran2)==2
        R2(i2,2)=13+round(100*sqrt(2)*0.05*randn(1))/100;
    elseif ceil(ran2)==3
        R2(i2,2)=17+round(100*sqrt(2)*0.05*randn(1))/100;
    else
        R2(i2,2)=20+round(100*sqrt(2)*0.05*randn(1))/100;
    end
  
    if mod(i2,36)>=0 & mod(i2,36)<=2
       R2(i2,1)=3000+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=3 & mod(i2,36)<=5
       R2(i2,1)=3050+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=6 & mod(i2,36)<=8
       R2(i2,1)=3080+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=9 & mod(i2,36)<=11
       R2(i2,1)=3090+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=12 & mod(i2,36)<=14
       R2(i2,1)=3100+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=15 & mod(i2,36)<=17
       R2(i2,1)=3130+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=18 & mod(i2,36)<=20
       R2(i2,1)=3150+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=21 & mod(i2,36)<=23
       R2(i2,1)=3190+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=24 & mod(i2,36)<=26
       R2(i2,1)=3240+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=27 & mod(i2,36)<=29
       R2(i2,1)=3260+round(10*3*randn(1))/10;
    elseif mod(i2,36)>=30 & mod(i2,36)<=32
       R2(i2,1)=3270+round(10*3*randn(1))/10;
    else 
       R2(i2,1)=3300+round(10*3*randn(1))/10;
    end
    R2(i2,5)=toa2;
    R2(i2,6)=2;
    toa2=toa2+R2(i2,4);
    i2=i2+1;
end