Kitonum

21870 Reputation

26 Badges

17 years, 241 days

MaplePrimes Activity


These are replies submitted by Kitonum

Alejandro Jakubi  and  Preben Alsholm . Thank you very much for your interest and the analysis carried out.

@Axel Vogt  but still would like to know the cause of the error.

@Rouben Rostamian   Agreed that the basis for my solution is your idea. But it has been improved: now user can explicitly specify a range for the variable  

@Markiyan Hirnyk  You are absolutely right, so vote up from me.

@Carl Love  Thank you for your helpful comment.

@Carl Love  Thank you for the quick response and solution to the problem. 

@acer  I figured it out just like you, but maybe OP just confuses these interfaces.

@mapleatha  Acer's method and old reference worked for me also (only in  Standard worksheet rather than Classic worksheet).

@Carl Love   Thank you for the detection of serious gap in my decision.

@nMaple  Select  remember table assignment  and press  OK

@Markiyan Hirnyk  For  n=4  Maple 2015 works incorrectly. Here is the calculation in Maple 16 with visualization:

 

restart;

P := combinat[choose]({$1 .. 4}, 2):

S := combinat[powerset](P):

L := [seq(GraphTheory[Graph](4, S[k]), k = 1 .. nops(S))]:

M := [ListTools[Categorize]((x, y)-> GraphTheory[IsIsomorphic](x, y), L)]:

K := [seq(M[i, 1], i = 1 .. nops(M))]:

nops(K);

plots[display](Matrix(3, 5, [seq(GraphTheory[DrawGraph](K[k]), k = 1 .. 11), plot([[0, 0]], axes = none)$4]), scaling = constrained);

            

 

 

@Carl Love   Thank you, very elegant improvement. 

@Carl Love  I corrected and expanded my post.

@kegj  Should be  plot1  rather than  plot 1 . Copy my code and simply paste it into your document and run.

First 96 97 98 99 100 101 102 Last Page 98 of 134