question2.m

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

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=[-10000 12000 -8000 8000]
    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;