Error in ploting the network graph?how to make the code run??
    3 views (last 30 days)
  
       Show older comments
    
   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 Comments
Answers (0)
See Also
Community Treasure Hunt
Find the treasures in MATLAB Central and discover how the community can help you!
Start Hunting!