adjcel1.m

来自「This program shows the distributions of 」· M 代码 · 共 14 行

% This function is to find cellulars coordinates (Base Stations in the middle) for a given N (so as i/j)

function [CelLoc] = AdjCel(N)

[ii,jj] = CorN(N)
CelLoc = zeros(18,1)+j*zeros(18,1);
for k = 1:6
    CelLoc(k) = sqrt(3)*( ii*exp(j*pi/6+j*pi/3*(k-1)) + jj*exp(j*pi/6+j*pi/3*k));
end;
for k = 1:6
    CelLoc(2*k+5) = CelLoc(k) + sqrt(3)*( ii*exp( j*pi/6)  + jj*exp( j*pi/6+j*pi/3))*exp(j*(k-1)*pi/3) ;
    CelLoc(2*k+6) = CelLoc(k) + sqrt(3)*( ii*exp(-j*pi/6)  + jj*exp(-j*pi/6+j*pi/3))*exp(j*(k-1)*pi/3) ;
end;