How to construct a large graph (~1e5) that has max, min, and avg degree using the logical sparse adj matrix that computes faster. Also, how to ensure that the graph is not broken (there are no subsets of disconnected graphs in the main graph)? 

1 Ansicht (letzte 30 Tage)
I have the following code for generating a small (~1e3) graph that I can control the degree of (code 1). This has n (number of nodes), min, max and avg degree as the inputs.
clc;clear;
n=5000;
% dl=10; %dl=degree limit
mind=5;
maxd=100;
avgd=10;
totd=avgd*n;
td=.5*n*(n-1);
a=zeros(n,n);
degct=zeros(1,n);
nd=2:n;
% generating adj
for i=1:n
t=[];
tn=mind-degct(i);
if length(nd)<tn
t=randperm(n-1,tn);
a(i,t)=1;
a(t,i)=1;
degct=sum(a);
break;
end
if tn>0
t=randperm(length(nd),tn);
a(i,nd(t))=1;
a(nd(t),i)=1;
degct=sum(a);
end
ind=find(degct==mind);
nd=setdiff(nd,ind);
if (isempty(nd))
break;
end
end
%%
% a=a+a';
a1=triu(a);
rd=totd-sum(degct);
at=-1*ones(n,n);
at=tril(at);
a1=a1+at;
indt=find(a1==0);
ind=randperm(length(indt),rd);
a1(indt(ind))=1;
a1=triu(a1);
a1=a1+a1';
a=a1;
%%
for i=1:n-1
a(i,i+1)=1;
a(i+1,i)=1;
end
for i=1:n
a(i,i)=0;
end
%%
if issymmetric(a)
disp('a is symmetric')
else
disp('symmetricity error')
end
%%
filemat='file1.mat';
save(filemat,'a');
%%
sa=[];
sa=sum(a);
min(sa)
max(sa)
But then I have figured out a way to generate random graphs using a logical array that takes less time and memory to compute (code 2). This has only nodes and connectivity as the inputs.
function [a,ed] = Random_graph_genar_function_v4(nodes, connectivity)
nPasses=10;
a=sparse(false);
for i=1:nPasses
a=a | logical(sprandsym(nodes,connectivity/nPasses));
end
a(1:nodes+1:end)=0; %zero the diagonal
G=graph(a);
ed=table2array(G.Edges).';
end
The final code need not have connectivity, but it must have n, min, max, and avg degree as the inputs.
I would like to integrate the two. I see that degree(graph) can return the degree and I can discard the nodes that do not have the desired degree. But, I am unsure about how to ensure that the graphs that I construct have the degree between (min, max). Thanks in advance.
Also, it need not be a function, if having a function induces function call lags. I am not sure if calling the function and retrieving the values can introduce the time lag or not.
  5 Kommentare

Melden Sie sich an, um zu kommentieren.

Antworten (0)

Kategorien

Mehr zu Networks finden Sie in Help Center und File Exchange

Produkte


Version

R2020b

Community Treasure Hunt

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

Start Hunting!

Translated by