Error in ploting the network graph?how to make the code run??
1 visualizzazione (ultimi 30 giorni)
Mostra commenti meno recenti
n=10;
L=5;
B=4;
A=[L B];
% non-overlap distance > 5
distinct_BOUND = 2;
Z = zeros(n,2);
T = rand(1,2).*A;
Z(1,:) = T;
for i = 2:n
T = rand(1,2).*A;
for j = 1:i-1
while pdist([T;Z(j,:)],'euclidean') < distinct_BOUND
T = rand(1,2).*A;
end
end
Z(i,:) = T;
end
z=round(Z);
x=z(:,1);
y=z(:,2);
d=zeros(n,n-1);
% here we set the transmitting range tr=4
tr=4;
for i=1:n
for j=(i+1):n
Xi=x(i,:);
Yi=y(i,:);
Xj=x(j,:);
Yj=y(j,:);
X = [Xi,Yi;Xj,Yj];
d(i,j) =round( pdist(X,'euclidean'));
end
end
N=round((n*n-1)/2)
s=zeros(1,N);
t=zeros(1,N);
weights=zeros(1,N);
for i=1:n
for j=(i+1):n
if d(i,j)<tr
k=1;
D(1,k)=d(i,j);
s(1,k)=i;
t(1,k)=j;
end
k=k+1;
end
end
G = graph(s,t,weights)
figure(3)
plot(G)
5 Commenti
Risposte (0)
Vedere anche
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!