移动搜索 正六边形（中继站） 蜂窝中心坐标 Matlab

xcc0900720130

我想用移动搜索的办法确定一个确定的圆（规定区域）所能覆盖的最少正六边形（也就是中继站），可是确定下面的蜂窝中心确实遇到些麻烦，我想把它们的坐标放到一个矩阵里。希望大家帮个忙，谢谢了。
下面是画蜂巢的Matlab 程序
r=1;
rc=0.7;
figure;
axis square
hold on;
A=pi/3*[0:6];
aa=linspace(0,pi*2,80);
plot(r*exp(i*A),'k','linewidth',2);
g1=fill(real(r*exp(i*A)),imag(r*exp(i*A)),'k');
set(g1,'FaceColor',[1,0.5,0])
g2=fill(real(rc*exp(i*aa)),imag(rc*exp(i*aa)),'k');
set(g2,'FaceColor',[1,0.5,0],'edgecolor',[1,0.5,0],'EraseMode','xor')
text(0,0,'1','fontsize',10);
Z=0;
At=pi/6;
RA=-pi/2;
N=1;At=-pi/2-pi/3*[0:6];
for k=1:3;
Z=Z+sqrt(3)*r*exp(i*pi/6);
for pp=1:6;
for p=1:k;
N=N+1;
zp=Z+r*exp(i*A);
zr=Z+rc*exp(i*aa);
g1=fill(real(zp),imag(zp),'k');
set(g1,'FaceColor',[1,0.5,0],'edgecolor',[1,0,0]);
g2=fill(real(zr),imag(zr),'k');
set(g2,'FaceColor',[1,0.5,0],'edgecolor',[1,0.5,0],'EraseMode','xor');
text(real(Z),imag(Z),num2str(N),'fontsize',10);
Z=Z+sqrt(3)*r*exp(i*At(pp));
end
end
end
xlim([-6,6]*r)
ylim([-6,6]*r)

空木葬花

非常感谢楼主的福利！

头狼

夜空.silence

楼主好人  学习学习

491947630

不过，这个帖子好像是两年前的了

491947630

其实，我在想人工手算也是可以推算的

491947630

在向楼主好好学习ing。

新手ttt

lulu3072

thanks!!!!!!!!!!!!!!

ldyoung

来来。让我仔细看一下