how to remove duplicate edges like A-B, B-A are showing same.

1 次查看(过去 30 天)
fileID = fopen('C:\Users\TR RAO\Desktop\rao.txt','r');
C = textscan(fileID, '%s %s');
fclose(fileID);
d1=cellstr(C{1,1});d2=cellstr(C{1,2});
G=graph(d1,d2);
A=adjacency(G)
The above program is not allowing duplicates. Kindly suggest me solution
Input:
1 2
1 3
1 4
2 1
4 1
2 3

回答(1 个)

KSSV
KSSV 2018-2-13
A = [1 2
1 3
1 4
2 1
4 1
2 3] ;
% Get distance of th epoints from origin
data = repmat([0 0],[length(A),1])-A ;
dist = sqrt(data(:,1).^2+data(:,2).^2);
[c,ia,ib] = unique(dist) ;
iwant = A(ia,:)

类别

Help CenterFile Exchange 中查找有关 Mathematics 的更多信息

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by