质心算法
质心算法程序
Matlab
WSNs 的质心法Matlab 代码，密度1010，间隔10。效果良好 。 clear
clc
for i=1:1:10
for j=1:1:10
x(j+(i-1)*10)=(i-1)*10;
y(j+(i-1)*10)=(j-1)*10;
end
end
figure
plot(x,y,'.')
hold on
axis([0 100 0 100])
xy=[x;y]
hold on
xm=90;
ym=90;
n=50;
for i=1:1:n
Sx(i)=rand(1,1)*xm;
Sy(i)=rand(1,1)*ym;
plot(Sx(i),Sy(i),'r*')
xlabel('x轴')
ylabel('y轴')
hold on
end
dm=30
m=100;
for j=1:1:n
SS=[Sx(j);Sy(j)];
k=0;
for i=1:1:m
d=norm((xy(:,i)-SS),2);
if d<=dm
xx(j,i)=xy(1,i);
yy(j,i)=xy(2,i);
k=k+1;
else
xx(j,i)=0;
yy(j,i)=0;
end
end
if k~=0
cent(:,j)=[sum(xx(j,:));sum(yy(j,:))]/k;
else
cent(:,j)=0;
end
plot(cent(1,j),cent(2,j),'o')
hold on
plot([cent(1,j) Sx(j)],[cent(2,j) Sy(j)],'R')
Title('Centroid')
hold on
MM=[cent(1,j);cent(2,j)] e(j)=norm((MM-SS),2)/dm end
figure
axis([0 n 0 1])
j=1:1:n
plot(j,e(j) ,'-r.')
hold on
Title('Centroid')
E=sum(e)/n
本文档为【质心算法】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。
该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。
[版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
浙公网安备 33021202002483