-
大小: 2KB文件類型: .rar金幣: 2下載: 2 次發(fā)布日期: 2021-05-21
- 語(yǔ)言: Matlab
- 標(biāo)簽:
資源簡(jiǎn)介
利用粒子群算法解決無(wú)線傳感器網(wǎng)絡(luò)節(jié)點(diǎn)區(qū)域部署問題,使得部署后節(jié)點(diǎn)的探測(cè)面積盡量覆蓋整個(gè)區(qū)域

代碼片段和文件信息
function?z=fun(xy)
%x?input??圓心橫坐標(biāo)
%y?input??圓心縱坐標(biāo)
%z??output?覆蓋率
L=100;?%?正方形區(qū)域邊長(zhǎng)
R=12;?%?圓半徑
[mn]=meshgrid(1:L);
Ar=linspace(0pi*2200);?%?圓周角度
for?i=1:30
D=sqrt([m-x(i)].^2+[n-y(i)].^2);?%?計(jì)算坐標(biāo)點(diǎn)到圓心的距離
[m0n0]=find(D<=R);?%?檢測(cè)出圓覆蓋點(diǎn)的坐標(biāo)
Ind=sub2ind([LL]m0n0);?%?坐標(biāo)與索引轉(zhuǎn)化
M(Ind)=1;?%?改變覆蓋狀態(tài)
end
scale=sum(M(1:end))/L/L;?%?計(jì)算覆蓋比例
z=scale;
end
?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----
?????文件????????436??2016-08-26?14:39??MATLAB-PSO區(qū)域覆蓋\fun.m
?????文件???????2591??2016-12-20?15:38??MATLAB-PSO區(qū)域覆蓋\PSO.m
?????目錄??????????0??2017-05-02?15:00??MATLAB-PSO區(qū)域覆蓋
-----------?---------??----------?-----??----
?????????????????3027????????????????????3
評(píng)論
共有 條評(píng)論