question2.asv

来自「fading 在无线中的应用」· ASV 代码 · 共 43 行

par.cellradius=1000;
    par.sps=1;
    par.km=1;
    par.lm=1;
    par.ncluster=4;
    [xyb,fib,rombvec]=crecells(par.cellradius,par.sps,par.km,par.lm,par.ncluster);
    figure(1);
    axis([-13000  13000  -10000 10000]);
    plot(x,y)
    plothex(xyb,fib);
    title('Typical mobile location realization');
    xlabel('Position[m]');
    ylabel('Position[m]');
 
    par.amean=2;
    par.vmean=1;
    par.dt=10;
    nmob=100;
    xym=nans(nmob,1);
    xyv=nans(nmob,1);
    m=(1:nmob).';
   [xym,xyv]=mobmove(xym,xyv,par.amean,par.vmean,par.dt,rombvec);
     hold on;
     
    plot(xym,'b*');
    hold off;
    
    
    
    
    
    
    axis ([-1 4 -1 3]);