A006759 Number of one-sided strictly 3-dimensional polyominoes with n cells.
0, 0, 0, 3, 17, 131, 915, 6553, 47026, 341888, 2505449, 18534827, 138224058, 1038594326, 7856087894, 59782042225, 457359506070, 3515816578512, 27143401299351, 210372490707568
Offset: 1
References
- N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
Links
- W. F. Lunnon, Counting multidimensional polyominoes, Computer Journal 18 (4) (1975) 366-367.
Crossrefs
A column of A195738.
Programs
-
Mathematica
A[s_Integer] := With[{s6 = StringPadLeft[ToString[s], 6, "0"]}, Cases[ Import["https://oeis.org/A" <> s6 <> "/b" <> s6 <> ".txt", "Table"], {, }][[All, 2]]]; A000105 = A@000105; A000162 = A@000162; a[n_] := A000162[[n]] - A000105[[n + 1]]; a /@ Range[16] (* Jean-François Alcover, Jan 16 2020 *)