|
|
|
|
0, 0, 3, 4, 20, 66, 287, 1296, 6435, 34250, 194942, 1179036, 7544121, 50865920, 360167355, 2670210640, 20673196460, 166753291806, 1398415162703, 12169520162440, 109709590135635, 1022997624845614, 9852508254721222, 97880299543896216, 1001841501018883425
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
MATHEMATICA
|
a[n_] := n*(Sum[(-1)^(j-1)*BellB[n-j-1], {j, 1, n-1}]-(-1)^n); a[1] = 0; Table[a[n], {n, 1, 25}] (* Jean-François Alcover, Dec 09 2014 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|