- 1、本文档共21页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
wsn定位蒙特卡洛盒mcb算法matlab源码
clear;
clc;
%初始化工作
Ns = 40;
Nn = 400;
Vmax = 50;
Xrange = 500;
Yrange = 500;
tr = 100;
Rg = 0.5*0;
step = 6;
N = 50;
ns_range = 200; %每个采样盒子的最大采样次数
Nf = 1.5; %采样盒子确定时,估计位置要扩大圆面积
for i = 1:Ns
Xseed(1,i) = unifrnd(Rg,(Xrange-Rg),1,1);
Yseed(1,i) = unifrnd(Rg,(Yrange-Rg),1,1);
end
for i = 1:Nn
Xnode(1,i)=rand(1,1)*Xrange;
Ynode(1,i)=rand(1,1)*Yrange;
Xnode_g(1,i)=Xnode(1,i); %MCL估计位置,初始值设置为真实位置
Ynode_g(1,i)=Ynode(1,i);
end
%初始时刻的粒子群,for every node
for i = 1:Nn
for j = 1:N
lx(i,j,1) = 0;
ly(i,j,1) = 0;
end
end
for i = 1:Nn
error(1,i) = 0;
end
%figure(1);
%plot(Xseed,Yseed,bo,Xnode,Ynode,k*);
%节点们开始运动,每次定位完成才开始下一次运动,这里假设这个定位过程耗时非常短
%仿真步数
for k=2:step
%新的时刻,节点们先运动一下,RWP模型
if Ynode(k,i) Yrange || Ynode(k,i) 0
Xnode(k,i) = Xnode(k-1,i) + r*cos(thita);
Ynode(k,i) = Ynode(k-1,i) - r*sin(thita);
end
end
%对每一个node逐个进行定位
for i = 1:Nn
%测试每个seed是否可以用来定位
A1 = []; %存储1跳锚节点序号
A2 = []; %存储2跳锚节点序号
for j = 1:Ns
d1 = sqrt((Xnode(k,i)-Xseed(k,j))^2+(Ynode(k,i)-Yseed(k,j))^2);
if d1=tr
A1 = [A1 j];
end
end
if temp1~=0 temp2==0
a1_x_min = [];
a1_x_max = [];
a1_y_min = [];
a1_y_max = [];
for m = 1:temp1
a1_x_min = [a1_x_min Xseed(k,A1(m))-tr];
a1_x_max = [a1_x_max Xseed(k,A1(m))+tr];
a1_y_min = [a1_y_min Yseed(k,A1(m))-tr];
a1_y_max = [a1_y_max Yseed(k,A1(m))+tr];
end
Xanbox_min(k,i) = max(a1_x_min);
Xanbox_max(k,i) = min(a1_x_max);
Yanbox_min(k,i) = max(a1_y_min);
Yanbox_max(k,i) = min(a1_y_max);
end
if temp1==0 temp2~=0
a2_x_min = [];
a2_x_max = [];
a2_y_min = [];
a2_y_max
文档评论(0)