login
A343263
a(0) = 1; a(n+1) = exp(-a(n)) * Sum_{k>=0} a(n)^k * k^n / k!.
0
1, 1, 1, 2, 22, 301554, 2493675105669492542968967478
OFFSET
0,4
COMMENTS
The next term is too large to include.
FORMULA
a(0) = 1; a(n+1) = n! * [x^n] exp(a(n) * (exp(x) - 1)).
a(0) = 1; a(n+1) = Sum_{k=0..n} Stirling2(n,k) * a(n)^k.
MATHEMATICA
a[0] = 1; a[n_] := a[n] = Sum[StirlingS2[n - 1, k] a[n - 1]^k, {k, 0, n - 1}]; Table[a[n], {n, 0, 6}]
a[0] = 1; a[n_] := a[n] = BellB[n - 1, a[n - 1]]; Table[a[n], {n, 0, 6}]
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Apr 09 2021
STATUS
approved