A302693 a(n) = [x^n] 1 + x*(1 + x^2*(1 + x^3*(1 + x^4*(1 + x^5*(1 + ...)^n)^n)^n)^n)^n.

1, 1, 0, 3, 0, 10, 36, 35, 448, 450, 4600, 13167, 45408, 240006, 670124, 3863835, 13209088, 60533974, 268324056, 1089776654, 5328589520, 22065836226, 106289169448, 481033496803, 2231768294208, 10748702587800, 49858509230920, 245664498591891, 1175943617623264

Offset

0,4

Links

Table of n, a(n) for n=0..28.

Mathematica

Table[SeriesCoefficient[1 + x Fold[(x^(#2 + 1) #1 + 1)^n &, 0, Reverse[Range[n]]], {x, 0, n}], {n, 0, 28}]

Crossrefs

Cf. A010054, A108643, A132330, A302657, A302686.

Sequence in context: A095200 A090460 A071983 * A327881 A215514 A215347

Adjacent sequences: A302690 A302691 A302692 * A302694 A302695 A302696

Keyword

nonn

Author

Ilya Gutkovskiy, Apr 11 2018

Status

approved