1.完整项目描述和程序获取
>面包多安全交易平台:https://mbd.pub/o/bread/ZJmamJxv
>如果链接失效，可以直接打开本站店铺搜索相关店铺：
>如果链接失效，程序调试报错或者项目合作也可以加微信或者QQ联系。
2.部分仿真图预览
3.算法概述
移动自组网（Mobile Ad Hoc Network，简称MANET）是一种无需基础设施支持的网络，它由一组移动的节点组成，这些节点可以自组织形成一个网络，实现数据的传输和共享。由于MANET是一种去中心化的网络，因此其路由协议的设计非常重要。目前，常用的路由协议包括基于距离向量的协议、基于链路状态的协议、基于位置的协议等。其中，基于距离向量的协议最为简单易实现，但存在收敛慢、路由环路等问题；基于链路状态的协议收敛速度快，但需要维护全局状态信息，开销较大；基于位置的协议只考虑节点位置信息，无法应对网络拓扑变化等挑战。因此，设计一种高效的路由协议对MANET的性能具有重要意义。
4.部分源码
......................................................
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
for ni = 1:length(Nnodes);
ni
%节点个数
Nnode = Nnodes(ni);
Delays2 = zeros(1,MTKL);%端到端时延
consmp2 = zeros(1,MTKL);%网络拓扑控制开销
Srate2 = zeros(1,MTKL);%数据包递交率
for jn = 1:MTKL
X = rand(1,Nnode)*SCALE;
Y = rand(1,Nnode)*SCALE;
T = rand(1,Nnode);
Delays = zeros(Times,1);%端到端时延
consmp = zeros(Times,1);%网络拓扑控制开销
Srate = zeros(Times,1);%数据包递交率
for t = 1:Times
if t == 1
X = X;
Y = Y;
else
%节点发送随机的移动
X = X + Vmax*rand;
Y = Y + Vmax*rand;
end
%network topology
dmatrix= zeros(Nnode,Nnode);
matrix = zeros(Nnode,Nnode);
Trust = zeros(Nnode,Nnode);
for i = 1:Nnode
for j = 1:Nnode
Dist = sqrt((X(i) - X(j))^2 + (Y(i) - Y(j))^2);
%a link;
if Dist <= Radius
matrix(i,j) = 1;
Trust(i,j) = 1-((T(i)+T(j))/2);
dmatrix(i,j) = Dist;
else
matrix(i,j) = inf;
Trust(i,j) = inf;
dmatrix(i,j) = inf;
end;
end;
end;
%定义通信起始节点和终止节点
tmp = randperm(Nnode);
for i = 1:Nnode
distA(i) = sqrt((X(i))^2 + (Y(i))^2);
distB(i) = sqrt((X(i)-SCALE)^2 + (Y(i)-SCALE)^2);
end
[Va,Ia] = min(distA);
[Vb,Ib] = min(distB);
Sn = Ia;
En = Ib;
%根据Dynamic Source Routing协议搜索通信路径
[paths,costs] = func_DSR_BF(Sn,En,dmatrix,Trust,w1,w2);
path_distance=min(Va,Vb);
for d=2:length(paths)
path_distance= path_distance + dmatrix(paths(d-1),paths(d));
end
%端到端时延
path_hops = min(length(paths)-1,1);
%根据距离，数据包长度和数据发送包速率计算延迟
Delays(t) = path_distance*(SLen/Smax)/1e3;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%数据包递交率
%根据选择的路径进行数据包的发送，并根据发送的数据包碰撞概率计算递交率
%该指标和移动速度以及节点的增加有关
%定义数据碰撞概率为一个较小值Ps
Ps = rand/5;
tmps = 0;
for ii = 1:path_hops
tmps = tmps + path_distance*Ps^ii/1e3;
end
Srate(t) = 1-tmps;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%网络拓扑控制开销
consmp(t)= 1000*path_distance*(Eelec+Eelec+Efs);
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
end
Delays2(jn) = mean(Delays);
Srate2(jn) = mean(Srate);
consmp2(jn) = mean(consmp);
end
ind1 = find(Delays2 > 1e5);
ind2 = find(Delays2 < 0);
ind = unique([ind1,ind2]);
Delays2(ind) = [];
Delayn(ni) = mean(Delays2);
ind1 = find(Srate2 > 1);
Srate2(ind1) = [];
Sraten(ni) = mean(Srate2);
ind1 = find(consmp2 < 0);
consmp2(ind1)= [];
consmpn(ni) = mean(consmp2);
end
figure;
plot(Nnodes,Delayn,'-r>',...
'LineWidth',1,...
'MarkerSize',6,...
'MarkerEdgeColor','k',...
'MarkerFaceColor',[0.9,0.9,0.0]);
grid on
xlabel('number of noders');
ylabel('端到端时延(ms)');
axis([Nnodes(1),Nnodes(end),0,15]);
figure;
plot(Nnodes,Sraten,'-r>',...
'LineWidth',1,...
'MarkerSize',6,...
'MarkerEdgeColor','k',...
'MarkerFaceColor',[0.9,0.9,0.0]);
grid on
xlabel('number of noders');
ylabel('数据包递交率(%)');
axis([Nnodes(1),Nnodes(end),0.8,1.05]);
figure;
plot(Nnodes,consmpn,'-r>',...
'LineWidth',1,...
'MarkerSize',6,...
'MarkerEdgeColor','k',...
'MarkerFaceColor',[0.9,0.9,0.0]);
grid on
xlabel('number of noders');
ylabel('网络控制开销(mJ)');
axis([Nnodes(1),Nnodes(end),0,0.1]);
save R2.mat Nnodes Delayn Sraten consmpn
12_084_m
