Generating adjacency matrices from isomorphic graphsTikz foreach inside matrixHow to make tikz center the cells of a matrix?Bipartite graphsDrawing graphs in LaTeXGenerating dozens of graphsTo wrap the external lines so that it can touch the perimeterDrawing rectilinear curves in Tikz, aka an Etch-a-Sketch drawingExporting graphs from Mathematica to LaTex document?Line up nested tikz enviroments or how to get rid of themGenerating graphs with smooth edges?How to draw animated isomorphic graphs?

How do I implement a file system driver driver in Linux?

Does having a TSA Pre-Check member in your flight reservation increase the chances that everyone gets Pre-Check?

Sampling Theorem and reconstruction

When quoting, must I also copy hyphens used to divide words that continue on the next line?

Would it be legal for a US State to ban exports of a natural resource?

Is a model fitted to data or is data fitted to a model?

THT: What is a squared annular “ring”?

Should I install hardwood flooring or cabinets first?

Confusion on Parallelogram

Can I use my Chinese passport to enter China after I acquired another citizenship?

Can the Supreme Court overturn an impeachment?

What linear sensor for a keyboard?

Query about absorption line spectra

In Star Trek IV, why did the Bounty go back to a time when whales were already rare?

Can someone explain how this makes sense electrically?

How to color a curve

How do I repair my stair bannister?

Greco-Roman egalitarianism

Why in book's example is used 言葉(ことば) instead of 言語(げんご)?

Could the E-bike drivetrain wear down till needing replacement after 400 km?

Is there a word to describe the feeling of being transfixed out of horror?

Is it improper etiquette to ask your opponent what his/her rating is before the game?

Could solar power be utilized and substitute coal in the 19th century?

What does the Rambam mean when he says that the planets have souls?



Generating adjacency matrices from isomorphic graphs


Tikz foreach inside matrixHow to make tikz center the cells of a matrix?Bipartite graphsDrawing graphs in LaTeXGenerating dozens of graphsTo wrap the external lines so that it can touch the perimeterDrawing rectilinear curves in Tikz, aka an Etch-a-Sketch drawingExporting graphs from Mathematica to LaTex document?Line up nested tikz enviroments or how to get rid of themGenerating graphs with smooth edges?How to draw animated isomorphic graphs?













2















Here are some isomorphic graphs and their corresponding adjacency matrices. I can draw the graphs with tikz. But I'm not sure the best way to draw the matrices. Is it possible to generate one from the other? What's the right way to approach it?



enter image description here



Here's an example of the code to generate a graph:



 documentclassstandalone
usepackagetikz
begindocument
begintikzpicture
tikzsetBullet/.style=circle,draw,fill=black,scale=0.75
node[Bullet,label=left :$e_1$] (E1) at (0,2) ;
node[Bullet,label=above:$e_2$] (E2) at (1,3) ;
node[Bullet,label=right:$e_3$] (E3) at (2,2) ;
node[Bullet,label=right:$e_4$] (E4) at (2,0) ;
node[Bullet,label=left :$e_5$] (E5) at (0,0) ;
draw[thick] (E1)--(E2)--(E3)--(E4)--(E5)--(E1) ;
endtikzpicture
enddocument









share|improve this question
























  • Shouldn't it be the other way around: you construct the diagrams from the adjacency matrices?

    – marmot
    3 hours ago











  • @marmot Probably, normally. Actually I don't think so. I mean.. Either way is probably good. But I have some graphs drawn up, and I want to draw the matrices to suit them. If I can't figure it out programmatically, I'll just draw them up separately. Either with LaTeX somehow or with Adobe Illustrator, or some spreadsheet/word processor. LaTeX would be nice though.

    – tjt263
    2 hours ago















2















Here are some isomorphic graphs and their corresponding adjacency matrices. I can draw the graphs with tikz. But I'm not sure the best way to draw the matrices. Is it possible to generate one from the other? What's the right way to approach it?



enter image description here



Here's an example of the code to generate a graph:



 documentclassstandalone
usepackagetikz
begindocument
begintikzpicture
tikzsetBullet/.style=circle,draw,fill=black,scale=0.75
node[Bullet,label=left :$e_1$] (E1) at (0,2) ;
node[Bullet,label=above:$e_2$] (E2) at (1,3) ;
node[Bullet,label=right:$e_3$] (E3) at (2,2) ;
node[Bullet,label=right:$e_4$] (E4) at (2,0) ;
node[Bullet,label=left :$e_5$] (E5) at (0,0) ;
draw[thick] (E1)--(E2)--(E3)--(E4)--(E5)--(E1) ;
endtikzpicture
enddocument









share|improve this question
























  • Shouldn't it be the other way around: you construct the diagrams from the adjacency matrices?

    – marmot
    3 hours ago











  • @marmot Probably, normally. Actually I don't think so. I mean.. Either way is probably good. But I have some graphs drawn up, and I want to draw the matrices to suit them. If I can't figure it out programmatically, I'll just draw them up separately. Either with LaTeX somehow or with Adobe Illustrator, or some spreadsheet/word processor. LaTeX would be nice though.

    – tjt263
    2 hours ago













2












2








2








Here are some isomorphic graphs and their corresponding adjacency matrices. I can draw the graphs with tikz. But I'm not sure the best way to draw the matrices. Is it possible to generate one from the other? What's the right way to approach it?



enter image description here



Here's an example of the code to generate a graph:



 documentclassstandalone
usepackagetikz
begindocument
begintikzpicture
tikzsetBullet/.style=circle,draw,fill=black,scale=0.75
node[Bullet,label=left :$e_1$] (E1) at (0,2) ;
node[Bullet,label=above:$e_2$] (E2) at (1,3) ;
node[Bullet,label=right:$e_3$] (E3) at (2,2) ;
node[Bullet,label=right:$e_4$] (E4) at (2,0) ;
node[Bullet,label=left :$e_5$] (E5) at (0,0) ;
draw[thick] (E1)--(E2)--(E3)--(E4)--(E5)--(E1) ;
endtikzpicture
enddocument









share|improve this question
















Here are some isomorphic graphs and their corresponding adjacency matrices. I can draw the graphs with tikz. But I'm not sure the best way to draw the matrices. Is it possible to generate one from the other? What's the right way to approach it?



enter image description here



Here's an example of the code to generate a graph:



 documentclassstandalone
usepackagetikz
begindocument
begintikzpicture
tikzsetBullet/.style=circle,draw,fill=black,scale=0.75
node[Bullet,label=left :$e_1$] (E1) at (0,2) ;
node[Bullet,label=above:$e_2$] (E2) at (1,3) ;
node[Bullet,label=right:$e_3$] (E3) at (2,2) ;
node[Bullet,label=right:$e_4$] (E4) at (2,0) ;
node[Bullet,label=left :$e_5$] (E5) at (0,0) ;
draw[thick] (E1)--(E2)--(E3)--(E4)--(E5)--(E1) ;
endtikzpicture
enddocument






diagrams matrices graphs tikz-pic






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited 3 hours ago







tjt263

















asked 3 hours ago









tjt263tjt263

1876




1876












  • Shouldn't it be the other way around: you construct the diagrams from the adjacency matrices?

    – marmot
    3 hours ago











  • @marmot Probably, normally. Actually I don't think so. I mean.. Either way is probably good. But I have some graphs drawn up, and I want to draw the matrices to suit them. If I can't figure it out programmatically, I'll just draw them up separately. Either with LaTeX somehow or with Adobe Illustrator, or some spreadsheet/word processor. LaTeX would be nice though.

    – tjt263
    2 hours ago

















  • Shouldn't it be the other way around: you construct the diagrams from the adjacency matrices?

    – marmot
    3 hours ago











  • @marmot Probably, normally. Actually I don't think so. I mean.. Either way is probably good. But I have some graphs drawn up, and I want to draw the matrices to suit them. If I can't figure it out programmatically, I'll just draw them up separately. Either with LaTeX somehow or with Adobe Illustrator, or some spreadsheet/word processor. LaTeX would be nice though.

    – tjt263
    2 hours ago
















Shouldn't it be the other way around: you construct the diagrams from the adjacency matrices?

– marmot
3 hours ago





Shouldn't it be the other way around: you construct the diagrams from the adjacency matrices?

– marmot
3 hours ago













@marmot Probably, normally. Actually I don't think so. I mean.. Either way is probably good. But I have some graphs drawn up, and I want to draw the matrices to suit them. If I can't figure it out programmatically, I'll just draw them up separately. Either with LaTeX somehow or with Adobe Illustrator, or some spreadsheet/word processor. LaTeX would be nice though.

– tjt263
2 hours ago





@marmot Probably, normally. Actually I don't think so. I mean.. Either way is probably good. But I have some graphs drawn up, and I want to draw the matrices to suit them. If I can't figure it out programmatically, I'll just draw them up separately. Either with LaTeX somehow or with Adobe Illustrator, or some spreadsheet/word processor. LaTeX would be nice though.

– tjt263
2 hours ago










1 Answer
1






active

oldest

votes


















4














This is in case you change your mind and use the adjacency matrices to draw the graphs. TikZ allows you to define arrays, see p. 999 of the pgfmanual. And these arrays can be converted to tables using this nice answer. And these matrices/arrays can also be used to define the graphs.



documentclass[tikz,border=3.14mm]standalone
usepackageetoolbox
usetikzlibrarymatrix,positioning
% building the table in a foreach loop from https://tex.stackexchange.com/a/60400/121799
begindocument
begintikzpicture[Bullet/.style=circle,draw,fill=black,inner sep=1.5pt,
adjacency matrix/.style=ampersand replacement=&,matrix of math nodes,
row 1/.append style=nodes=font=boldmath,
column 1/.append style=nodes=font=boldmath,nodes in empty cells,
nodes=draw,minimum width=1.5em,text height=1.8ex,column sep=-pgflinewidth,row
sep=-pgflinewidth]
% first matrix
defadjancymatrix%
0,0,1,1,0,%
0,0,0,1,1,%
1,0,0,0,1,%
1,1,0,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=left]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (leftmat) [below=of left,adjacency matrix]
mymatrixcontent
;
%
% second matrix
defadjancymatrix%
0,1,0,0,1,%
1,0,1,0,0,%
0,1,0,1,0,%
0,0,1,0,1,%
1,0,0,1,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=middle,xshift=5cm]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (midmat) [below=of middle,adjacency matrix]
mymatrixcontent
;
% third matrix
defadjancymatrix%
0,1,0,1,0,%
1,0,0,0,1,%
0,0,0,1,1,%
1,0,1,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=right,xshift=10cm]
foreach X in 1,...,3
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
node[Bullet,label=90+72-4*72:$e_5$] (E5) at (90+72-4*72:2) ;
node[Bullet,label=90+72-5*72:$e_4$] (E4) at (90+72-5*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (rightmat) [below=of right,adjacency matrix]
mymatrixcontent
;

endtikzpicture
enddocument


enter image description here






share|improve this answer

























  • Not bad, can we get the matrix lines drawn in or is it just like that

    – tjt263
    50 mins ago











  • @tjt263 Yes, sure.

    – marmot
    42 mins ago











  • Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

    – tjt263
    27 mins ago










Your Answer








StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "85"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);













draft saved

draft discarded


















StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f481289%2fgenerating-adjacency-matrices-from-isomorphic-graphs%23new-answer', 'question_page');

);

Post as a guest















Required, but never shown

























1 Answer
1






active

oldest

votes








1 Answer
1






active

oldest

votes









active

oldest

votes






active

oldest

votes









4














This is in case you change your mind and use the adjacency matrices to draw the graphs. TikZ allows you to define arrays, see p. 999 of the pgfmanual. And these arrays can be converted to tables using this nice answer. And these matrices/arrays can also be used to define the graphs.



documentclass[tikz,border=3.14mm]standalone
usepackageetoolbox
usetikzlibrarymatrix,positioning
% building the table in a foreach loop from https://tex.stackexchange.com/a/60400/121799
begindocument
begintikzpicture[Bullet/.style=circle,draw,fill=black,inner sep=1.5pt,
adjacency matrix/.style=ampersand replacement=&,matrix of math nodes,
row 1/.append style=nodes=font=boldmath,
column 1/.append style=nodes=font=boldmath,nodes in empty cells,
nodes=draw,minimum width=1.5em,text height=1.8ex,column sep=-pgflinewidth,row
sep=-pgflinewidth]
% first matrix
defadjancymatrix%
0,0,1,1,0,%
0,0,0,1,1,%
1,0,0,0,1,%
1,1,0,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=left]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (leftmat) [below=of left,adjacency matrix]
mymatrixcontent
;
%
% second matrix
defadjancymatrix%
0,1,0,0,1,%
1,0,1,0,0,%
0,1,0,1,0,%
0,0,1,0,1,%
1,0,0,1,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=middle,xshift=5cm]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (midmat) [below=of middle,adjacency matrix]
mymatrixcontent
;
% third matrix
defadjancymatrix%
0,1,0,1,0,%
1,0,0,0,1,%
0,0,0,1,1,%
1,0,1,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=right,xshift=10cm]
foreach X in 1,...,3
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
node[Bullet,label=90+72-4*72:$e_5$] (E5) at (90+72-4*72:2) ;
node[Bullet,label=90+72-5*72:$e_4$] (E4) at (90+72-5*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (rightmat) [below=of right,adjacency matrix]
mymatrixcontent
;

endtikzpicture
enddocument


enter image description here






share|improve this answer

























  • Not bad, can we get the matrix lines drawn in or is it just like that

    – tjt263
    50 mins ago











  • @tjt263 Yes, sure.

    – marmot
    42 mins ago











  • Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

    – tjt263
    27 mins ago















4














This is in case you change your mind and use the adjacency matrices to draw the graphs. TikZ allows you to define arrays, see p. 999 of the pgfmanual. And these arrays can be converted to tables using this nice answer. And these matrices/arrays can also be used to define the graphs.



documentclass[tikz,border=3.14mm]standalone
usepackageetoolbox
usetikzlibrarymatrix,positioning
% building the table in a foreach loop from https://tex.stackexchange.com/a/60400/121799
begindocument
begintikzpicture[Bullet/.style=circle,draw,fill=black,inner sep=1.5pt,
adjacency matrix/.style=ampersand replacement=&,matrix of math nodes,
row 1/.append style=nodes=font=boldmath,
column 1/.append style=nodes=font=boldmath,nodes in empty cells,
nodes=draw,minimum width=1.5em,text height=1.8ex,column sep=-pgflinewidth,row
sep=-pgflinewidth]
% first matrix
defadjancymatrix%
0,0,1,1,0,%
0,0,0,1,1,%
1,0,0,0,1,%
1,1,0,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=left]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (leftmat) [below=of left,adjacency matrix]
mymatrixcontent
;
%
% second matrix
defadjancymatrix%
0,1,0,0,1,%
1,0,1,0,0,%
0,1,0,1,0,%
0,0,1,0,1,%
1,0,0,1,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=middle,xshift=5cm]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (midmat) [below=of middle,adjacency matrix]
mymatrixcontent
;
% third matrix
defadjancymatrix%
0,1,0,1,0,%
1,0,0,0,1,%
0,0,0,1,1,%
1,0,1,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=right,xshift=10cm]
foreach X in 1,...,3
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
node[Bullet,label=90+72-4*72:$e_5$] (E5) at (90+72-4*72:2) ;
node[Bullet,label=90+72-5*72:$e_4$] (E4) at (90+72-5*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (rightmat) [below=of right,adjacency matrix]
mymatrixcontent
;

endtikzpicture
enddocument


enter image description here






share|improve this answer

























  • Not bad, can we get the matrix lines drawn in or is it just like that

    – tjt263
    50 mins ago











  • @tjt263 Yes, sure.

    – marmot
    42 mins ago











  • Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

    – tjt263
    27 mins ago













4












4








4







This is in case you change your mind and use the adjacency matrices to draw the graphs. TikZ allows you to define arrays, see p. 999 of the pgfmanual. And these arrays can be converted to tables using this nice answer. And these matrices/arrays can also be used to define the graphs.



documentclass[tikz,border=3.14mm]standalone
usepackageetoolbox
usetikzlibrarymatrix,positioning
% building the table in a foreach loop from https://tex.stackexchange.com/a/60400/121799
begindocument
begintikzpicture[Bullet/.style=circle,draw,fill=black,inner sep=1.5pt,
adjacency matrix/.style=ampersand replacement=&,matrix of math nodes,
row 1/.append style=nodes=font=boldmath,
column 1/.append style=nodes=font=boldmath,nodes in empty cells,
nodes=draw,minimum width=1.5em,text height=1.8ex,column sep=-pgflinewidth,row
sep=-pgflinewidth]
% first matrix
defadjancymatrix%
0,0,1,1,0,%
0,0,0,1,1,%
1,0,0,0,1,%
1,1,0,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=left]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (leftmat) [below=of left,adjacency matrix]
mymatrixcontent
;
%
% second matrix
defadjancymatrix%
0,1,0,0,1,%
1,0,1,0,0,%
0,1,0,1,0,%
0,0,1,0,1,%
1,0,0,1,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=middle,xshift=5cm]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (midmat) [below=of middle,adjacency matrix]
mymatrixcontent
;
% third matrix
defadjancymatrix%
0,1,0,1,0,%
1,0,0,0,1,%
0,0,0,1,1,%
1,0,1,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=right,xshift=10cm]
foreach X in 1,...,3
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
node[Bullet,label=90+72-4*72:$e_5$] (E5) at (90+72-4*72:2) ;
node[Bullet,label=90+72-5*72:$e_4$] (E4) at (90+72-5*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (rightmat) [below=of right,adjacency matrix]
mymatrixcontent
;

endtikzpicture
enddocument


enter image description here






share|improve this answer















This is in case you change your mind and use the adjacency matrices to draw the graphs. TikZ allows you to define arrays, see p. 999 of the pgfmanual. And these arrays can be converted to tables using this nice answer. And these matrices/arrays can also be used to define the graphs.



documentclass[tikz,border=3.14mm]standalone
usepackageetoolbox
usetikzlibrarymatrix,positioning
% building the table in a foreach loop from https://tex.stackexchange.com/a/60400/121799
begindocument
begintikzpicture[Bullet/.style=circle,draw,fill=black,inner sep=1.5pt,
adjacency matrix/.style=ampersand replacement=&,matrix of math nodes,
row 1/.append style=nodes=font=boldmath,
column 1/.append style=nodes=font=boldmath,nodes in empty cells,
nodes=draw,minimum width=1.5em,text height=1.8ex,column sep=-pgflinewidth,row
sep=-pgflinewidth]
% first matrix
defadjancymatrix%
0,0,1,1,0,%
0,0,0,1,1,%
1,0,0,0,1,%
1,1,0,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=left]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (leftmat) [below=of left,adjacency matrix]
mymatrixcontent
;
%
% second matrix
defadjancymatrix%
0,1,0,0,1,%
1,0,1,0,0,%
0,1,0,1,0,%
0,0,1,0,1,%
1,0,0,1,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=middle,xshift=5cm]
foreach X in 1,...,5
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (midmat) [below=of middle,adjacency matrix]
mymatrixcontent
;
% third matrix
defadjancymatrix%
0,1,0,1,0,%
1,0,0,0,1,%
0,0,0,1,1,%
1,0,1,0,0,%
0,1,1,0,0
letmymatrixcontentempty
defmymatrixcontent
beginscope[local bounding box=right,xshift=10cm]
foreach X in 1,...,3
node[Bullet,label=90+72-X*72:$e_X$] (EX) at (90+72-X*72:2) ;
node[Bullet,label=90+72-4*72:$e_5$] (E5) at (90+72-4*72:2) ;
node[Bullet,label=90+72-5*72:$e_4$] (E4) at (90+72-5*72:2) ;
foreach X in 1,...,5
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontentX x
foreach Y in 1,...,5
pgfmathtruncatemacroitestadjancymatrix[X-1][Y-1]
ifnumitest=1
draw (EX) -- (EY);
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent& 1 x
else
begingroupedefxendgroup
noexpandgapptonoexpandmymatrixcontent &x
fi

gapptomymatrixcontent\

endscope
matrix (rightmat) [below=of right,adjacency matrix]
mymatrixcontent
;

endtikzpicture
enddocument


enter image description here







share|improve this answer














share|improve this answer



share|improve this answer








edited 42 mins ago

























answered 1 hour ago









marmotmarmot

111k5140264




111k5140264












  • Not bad, can we get the matrix lines drawn in or is it just like that

    – tjt263
    50 mins ago











  • @tjt263 Yes, sure.

    – marmot
    42 mins ago











  • Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

    – tjt263
    27 mins ago

















  • Not bad, can we get the matrix lines drawn in or is it just like that

    – tjt263
    50 mins ago











  • @tjt263 Yes, sure.

    – marmot
    42 mins ago











  • Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

    – tjt263
    27 mins ago
















Not bad, can we get the matrix lines drawn in or is it just like that

– tjt263
50 mins ago





Not bad, can we get the matrix lines drawn in or is it just like that

– tjt263
50 mins ago













@tjt263 Yes, sure.

– marmot
42 mins ago





@tjt263 Yes, sure.

– marmot
42 mins ago













Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

– tjt263
27 mins ago





Excellent. Wish I could go the other way. Maybe I will just try to draw them manually instead.

– tjt263
27 mins ago

















draft saved

draft discarded
















































Thanks for contributing an answer to TeX - LaTeX Stack Exchange!


  • Please be sure to answer the question. Provide details and share your research!

But avoid


  • Asking for help, clarification, or responding to other answers.

  • Making statements based on opinion; back them up with references or personal experience.

To learn more, see our tips on writing great answers.




draft saved


draft discarded














StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f481289%2fgenerating-adjacency-matrices-from-isomorphic-graphs%23new-answer', 'question_page');

);

Post as a guest















Required, but never shown





















































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown

































Required, but never shown














Required, but never shown












Required, but never shown







Required, but never shown







Popular posts from this blog

Францішак Багушэвіч Змест Сям'я | Біяграфія | Творчасць | Мова Багушэвіча | Ацэнкі дзейнасці | Цікавыя факты | Спадчына | Выбраная бібліяграфія | Ушанаванне памяці | У філатэліі | Зноскі | Літаратура | Спасылкі | НавігацыяЛяхоўскі У. Рупіўся дзеля Бога і людзей: Жыццёвы шлях Лявона Вітан-Дубейкаўскага // Вольскі і Памідораў з песняй пра немца Адвакат, паэт, народны заступнік Ашмянскі веснікВ Минске появится площадь Богушевича и улица Сырокомли, Белорусская деловая газета, 19 июля 2001 г.Айцец беларускай нацыянальнай ідэі паўстаў у бронзе Сяргей Аляксандравіч Адашкевіч (1918, Мінск). 80-я гады. Бюст «Францішак Багушэвіч».Яўген Мікалаевіч Ціхановіч. «Партрэт Францішка Багушэвіча»Мікола Мікалаевіч Купава. «Партрэт зачынальніка новай беларускай літаратуры Францішка Багушэвіча»Уладзімір Іванавіч Мелехаў. На помніку «Змагарам за родную мову» Барэльеф «Францішак Багушэвіч»Памяць пра Багушэвіча на Віленшчыне Страчаная сталіца. Беларускія шыльды на вуліцах Вільні«Krynica». Ideologia i przywódcy białoruskiego katolicyzmuФранцішак БагушэвічТворы на knihi.comТворы Францішка Багушэвіча на bellib.byСодаль Уладзімір. Францішак Багушэвіч на Лідчыне;Луцкевіч Антон. Жыцьцё і творчасьць Фр. Багушэвіча ў успамінах ягоных сучасьнікаў // Запісы Беларускага Навуковага таварыства. Вільня, 1938. Сшытак 1. С. 16-34.Большая российская1188761710000 0000 5537 633Xn9209310021619551927869394п

На ростанях Змест Гісторыя напісання | Месца дзеяння | Час дзеяння | Назва | Праблематыка трылогіі | Аўтабіяграфічнасць | Трылогія ў тэатры і кіно | Пераклады | У культуры | Зноскі Літаратура | Спасылкі | НавігацыяДагледжаная версіяправерана1 зменаДагледжаная версіяправерана1 зменаАкадэмік МІЦКЕВІЧ Канстанцін Міхайлавіч (Якуб Колас) Прадмова М. І. Мушынскага, доктара філалагічных навук, члена-карэспандэнта Нацыянальнай акадэміі навук Рэспублікі Беларусь, прафесараНашаніўцы ў трылогіі Якуба Коласа «На ростанях»: вобразы і прататыпы125 лет Янке МавруКнижно-документальная выставка к 125-летию со дня рождения Якуба Коласа (1882—1956)Колас Якуб. Новая зямля (паэма), На ростанях (трылогія). Сулкоўскі Уладзімір. Радзіма Якуба Коласа (серыял жывапісных палотнаў)Вокладка кнігіІлюстрацыя М. С. БасалыгіНа ростаняхАўдыёверсія трылогііВ. Жолтак У Люсiнскай школе 1959

Беларусь Змест Назва Гісторыя Геаграфія Сімволіка Дзяржаўны лад Палітычныя партыі Міжнароднае становішча і знешняя палітыка Адміністрацыйны падзел Насельніцтва Эканоміка Культура і грамадства Сацыяльная сфера Узброеныя сілы Заўвагі Літаратура Спасылкі НавігацыяHGЯOiТоп-2011 г. (па версіі ej.by)Топ-2013 г. (па версіі ej.by)Топ-2016 г. (па версіі ej.by)Топ-2017 г. (па версіі ej.by)Нацыянальны статыстычны камітэт Рэспублікі БеларусьШчыльнасць насельніцтва па краінахhttp://naviny.by/rubrics/society/2011/09/16/ic_articles_116_175144/А. Калечыц, У. Ксяндзоў. Спробы засялення краю неандэртальскім чалавекам.І ў Менску былі мамантыА. Калечыц, У. Ксяндзоў. Старажытны каменны век (палеаліт). Першапачатковае засяленне тэрыторыіГ. Штыхаў. Балты і славяне ў VI—VIII стст.М. Клімаў. Полацкае княства ў IX—XI стст.Г. Штыхаў, В. Ляўко. Палітычная гісторыя Полацкай зямліГ. Штыхаў. Дзяржаўны лад у землях-княствахГ. Штыхаў. Дзяржаўны лад у землях-княствахБеларускія землі ў складзе Вялікага Княства ЛітоўскагаЛюблінская унія 1569 г."The Early Stages of Independence"Zapomniane prawdy25 гадоў таму было аб'яўлена, што Язэп Пілсудскі — беларус (фота)Наша вадаДакументы ЧАЭС: Забруджванне тэрыторыі Беларусі « ЧАЭС Зона адчужэнняСведения о политических партиях, зарегистрированных в Республике Беларусь // Министерство юстиции Республики БеларусьСтатыстычны бюлетэнь „Полаўзроставая структура насельніцтва Рэспублікі Беларусь на 1 студзеня 2012 года і сярэднегадовая колькасць насельніцтва за 2011 год“Индекс человеческого развития Беларуси — не было бы нижеБеларусь занимает первое место в СНГ по индексу развития с учетом гендерного факцёраНацыянальны статыстычны камітэт Рэспублікі БеларусьКанстытуцыя РБ. Артыкул 17Трансфармацыйныя задачы БеларусіВыйсце з крызісу — далейшае рэфармаванне Беларускі рубель — сусветны лідар па дэвальвацыяхПра змену коштаў у кастрычніку 2011 г.Бядней за беларусаў у СНД толькі таджыкіСярэдні заробак у верасні дасягнуў 2,26 мільёна рублёўЭканомікаГаласуем за ТОП-100 беларускай прозыСучасныя беларускія мастакіАрхитектура Беларуси BELARUS.BYА. Каханоўскі. Культура Беларусі ўсярэдзіне XVII—XVIII ст.Анталогія беларускай народнай песні, гуказапісы спеваўБеларускія Музычныя IнструментыБеларускі рок, які мы страцілі. Топ-10 гуртоў«Мясцовы час» — нязгаслая легенда беларускай рок-музыкіСЯРГЕЙ БУДКІН. МЫ НЯ ЗНАЕМ СВАЁЙ МУЗЫКІМ. А. Каладзінскі. НАРОДНЫ ТЭАТРМагнацкія культурныя цэнтрыПублічная дыскусія «Беларуская новая пьеса: без беларускай мовы ці беларуская?»Беларускія драматургі па-ранейшаму лепш ставяцца за мяжой, чым на радзіме«Працэс незалежнага кіно пайшоў, і дзяржаву турбуе яго непадкантрольнасць»Беларускія філосафы ў пошуках прасторыВсе идём в библиотекуАрхіваванаАб Нацыянальнай праграме даследавання і выкарыстання касмічнай прасторы ў мірных мэтах на 2008—2012 гадыУ космас — разам.У суседнім з Барысаўскім раёне пабудуюць Камандна-вымяральны пунктСвяты і абрады беларусаў«Мірныя бульбашы з малой краіны» — 5 непраўдзівых стэрэатыпаў пра БеларусьМ. Раманюк. Беларускае народнае адзеннеУ Беларусі скарачаецца колькасць злачынстваўЛукашэнка незадаволены мінскімі ўладамі Крадзяжы складаюць у Мінску каля 70% злачынстваў Узровень злачыннасці ў Мінскай вобласці — адзін з самых высокіх у краіне Генпракуратура аналізуе стан са злачыннасцю ў Беларусі па каэфіцыенце злачыннасці У Беларусі стабілізавалася крымінагеннае становішча, лічыць генпракурорЗамежнікі сталі здзяйсняць у Беларусі больш злачынстваўМУС Беларусі турбуе рост рэцыдыўнай злачыннасціЯ з ЖЭСа. Дазволіце вас абкрасці! Рэйтынг усіх службаў і падраздзяленняў ГУУС Мінгарвыканкама вырасАб КДБ РБГісторыя Аператыўна-аналітычнага цэнтра РБГісторыя ДКФРТаможняagentura.ruБеларусьBelarus.by — Афіцыйны сайт Рэспублікі БеларусьСайт урада БеларусіRadzima.org — Збор архітэктурных помнікаў, гісторыя Беларусі«Глобус Беларуси»Гербы и флаги БеларусиАсаблівасці каменнага веку на БеларусіА. Калечыц, У. Ксяндзоў. Старажытны каменны век (палеаліт). Першапачатковае засяленне тэрыторыіУ. Ксяндзоў. Сярэдні каменны век (мезаліт). Засяленне краю плямёнамі паляўнічых, рыбакоў і збіральнікаўА. Калечыц, М. Чарняўскі. Плямёны на тэрыторыі Беларусі ў новым каменным веку (неаліце)А. Калечыц, У. Ксяндзоў, М. Чарняўскі. Гаспадарчыя заняткі ў каменным векуЭ. Зайкоўскі. Духоўная культура ў каменным векуАсаблівасці бронзавага веку на БеларусіФарміраванне супольнасцей ранняга перыяду бронзавага векуФотографии БеларусиРоля беларускіх зямель ва ўтварэнні і ўмацаванні ВКЛВ. Фадзеева. З гісторыі развіцця беларускай народнай вышыўкіDMOZGran catalanaБольшая российскаяBritannica (анлайн)Швейцарскі гістарычны15325917611952699xDA123282154079143-90000 0001 2171 2080n9112870100577502ge128882171858027501086026362074122714179пппппп