OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..385
MATHEMATICA
A392923[n_] := If[n == 0, 1, Sum[n^(n-k)*Gamma[k+1, k+1]*Exp[k+1], {k, 0, n}]];
Array[A392923, 25, 0] (* Paolo Xausa, Apr 10 2026 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Mar 16 2026
STATUS
approved
