A140637 Number of unlabeled graphs of positive excess with n nodes.
0, 0, 0, 2, 15, 110, 936, 12073, 273972, 12003332, 1018992968, 165091159269, 50502031331411, 29054155657134165, 31426485969804026075, 64001015704527557101231, 245935864153532932681481794, 1787577725145611700547871854870, 24637809253125004524383007473440146
Offset: 1
Keywords
Examples
Below we show that a(8) = 12073. Note that A140636(n) is the number of connected graphs of positive excess with n nodes. Let G be a disconnected graph of positive excess with 8 nodes. In this case, G has one or two complex components. We have 3 graphs of order 8 with two complex components. One of those graphs is depicted in the figure below: O---O...O---O |\..|...|\./| |.\.|...|.X.| |..\|...|/.\| O---O...O---O If G has one complex component with 5 nodes, the non-complex part of G can be, a) One forest of order 3. There are 3 forests, so A140636(5) * 3 = 39 graphs. b) One triangle, so A140636(5) = 13 graphs. If G has one complex component with 6 nodes, the non-complex part of G is a forest of order 2. There are 2 forests. We have A140636(6) * 2, or 186 graphs. If G has one complex component with 7 nodes, the non-complex part of G is one isolated vertex. We have A140636(7), or 809 graphs. Finally if G is connected, we have A140636(8), or 11005 graphs. The total is 3 + 12 + 2 + 4 + 39 + 13 + 186 + 809 + 11005 = 12073.
Links
- Svante Janson, Donald E. Knuth, Tomasz Ćuczak and Boris Pittel, The Birth of the Giant Component.
Crossrefs
The connected covering case is A140636.
Programs
-
Mathematica
brute[m_]:=First[Sort[Table[Sort[Sort /@ (m/.Rule@@@Table[{(Union@@m)[[i]],p[[i]]},{i,Length[p]}])], {p,Permutations[Range[Length[Union@@m]]]}]]]; Table[Length[Union[brute /@ Select[Subsets[Subsets[Range[n],{2}]],Select[Tuples[#], UnsameQ@@#&]=={}&]]],{n,0,5}] (* Gus Wiseman, Feb 14 2024 *)
Comments