OFFSET
0,3
REFERENCES
K. K.-H. Butler and G. Markowsky, Enumeration of finite topologies, Proc. 4th S-E Conf. Combin., Graph Theory, Computing, Congress. Numer. 8 (1973), 169-184.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
C. M. Bender et al., Combinatorics and Field theory, arXiv:quant-ph/0604164, 2006.
Gunnar Brinkmann and Brendan D. McKay, Posets on up to 16 Points, Order 19(2) (2002), 147-179. See Table IV, up to 18 points.
Kim Ki-Hang Butler and George Markowsky, Enumeration of finite topologies, Proc. 4th S-E Conf. Combin., Graph Theory, Computing, Congress. Numer. 8 (1973), 169-184.
Kim Ki-Hang Butler and George Markowsky, Enumeration of finite topologies, Proc. 4th S-E Conf. Combin., Graph Theory, Computing, Congress. Numer. 8 (1973), 169-184. [Annotated scan of pages 180 and 183 only]
Sangmin Chun, Gangyong Lee, Mauricio Medina-Barcenas, and Cosmin S. Roman, Rudimentary Structural Matrix Rings, J. Alg. Appl. (2026). See p. 13.
Marcel Erné, Struktur- und Anzahlformeln für Topologien auf Endlichen Mengen, Manuscripta Math. 11 (1974), 221-259.
Marcel Erné, Struktur- und Anzahlformeln für Topologien auf Endlichen Mengen, Manuscripta Math. 11 (1974), 221-259. (Annotated scanned copy)
Marcel Erné and Kurt Stege, Counting Finite Posets and Topologies, Order 8 (1991), 247-265.
N. J. A. Sloane, List of sequences related to partial orders, circa 1972.
J. A. Wright, There are 718 6-point topologies, quasiorderings and transgraphs, Preprint, 1970 [Annotated scanned copy]
J. A. Wright, Letter to N. J. A. Sloane, Apr 06 1972, listing 18 sequences.
FORMULA
a(n) = Sum_{k=0..n} Stirling2(n,k)*A001927(k). - Vladeta Jovovic, Apr 10 2006
MATHEMATICA
A001035 = {1, 1, 3, 19, 219, 4231, 130023, 6129859, 431723379, 44511042511, 6611065248783, 1396281677105899, 414864951055853499, 171850728381587059351, 98484324257128207032183, 77567171020440688353049939, 83480529785490157813844256579, 122152541250295322862941281269151, 241939392597201176602897820148085023};
max = Length[A001035]-1;
B[x_] = Sum[A001035[[k+1]]*x^k/k!, {k, 0, max}];
A[x_] = 1 + Log[B[x]];
A001927 = CoefficientList[ A[x] + O[x]^(max-1), x]*Range[0, max-2]!;
a[n_] := Sum[StirlingS2[n, k] *A001927[[k+1]], {k, 0, n}];
Table[a[n], {n, 0, max -2}] (* Jean-François Alcover, Aug 30 2018, after Vladeta Jovovic *)
CROSSREFS
KEYWORD
nonn,nice
AUTHOR
EXTENSIONS
More terms from Vladeta Jovovic, Apr 10 2006
a(17)-a(18) using data from A001035 from Alois P. Heinz, Aug 30 2018
STATUS
approved
