|
|
A304857
|
|
a(n) = A304400(n) / n^2 for n >= 1.
|
|
2
|
|
|
1, 2, 17, 296, 8205, 322412, 16861408, 1129044208, 94262593881, 9617095872812, 1179417144559337, 171422055924510232, 29164680268271517644, 5744954740594875376712, 1297633915706481674014856, 333220154688593666676579264, 96542160783658837442386115393, 31344432027934429150200553978812
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
PROG
|
(PARI) {a(n) = my(A=[1], m); for(i=1, n, A=concat(A, 0); m=#A; A[m] = Vec( exp( (m-1)^2 * x * Ser(A) ) * (2 - Ser(A)) )[m] ); A[n+1]/n^2}
for(n=1, 20, print1(a(n), ", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|