基于MATLAB的pegasis算法源码

基于MATLAB的pegasis算法，无线传感器网络在MATLAB环境下的仿真源码

clear;
clc;
clf;

NodeNums=100;

AreaR=100;

Bx=50;
By=175;
Tr=100;
%for NodeNums=100:20:400

num=1;
num_plot=1;
En=0.25;
send_to_sink=0;
ctl_pkt_leng=100;
data_pkt_length=2000;
die_node_num=0;
die_node_num_pri=0;
run_round=0;
transmited_packet=0;
En_Cost=0;
En_Cost_pre=0;
inter_cost=0;
begin_to_send=0;
En_cost_per_round=0;

alive=1;
dead=0;

Node.x=AreaR*rand（1NodeNums）; % the position of node
Node.y=AreaR*rand（1NodeNums）;
%Node.x（100）=AreaR/2;
%Node.y（100）=AreaR/2;
Node.pri=linspace（00NodeNums）;
Node.already=linspace（00NodeNums）;
Node.to_nbr_dis=zeros（NodeNums）;
Node.to_pri_dis=linspace（00NodeNums）;
Node.send_dis=linspace（00NodeNums）;
Node.E=linspace（EnEnNodeNums）;
Node.status=linspace（alivealiveNodeNums）;
Node.E_dis=linspace（00N

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      11924  2012-03-09 15:56  pegasis.m

----------- ---------  ---------- -----  ----

                11924                    1