|
| |
| |
|
|
|
1, 1, 6, 71, 1336, 35233, 1205605, 50905881, 2561801682, 149816972193, 9988787022964, 748036456826960, 62173668375158492, 5679720951862607185, 565666934647950245036, 61000592050512159666215
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,3
|
|
|
LINKS
|
G. C. Greubel, Table of n, a(n) for n = 0..50
|
|
|
FORMULA
|
a(n) = A127134(n)/(n+1).
|
|
|
MATHEMATICA
|
T[n_, k_]:= T[n, k]= If[k==n, 1, Coefficient[(1 +x*Sum[x^(r-k-1)*Sum[T[r, c], {c, k+1, r}], {r, k+1, n}] +x^(n+1))^(k+1), x, n-k]]; Table[T[2*n, n]/(n+1), {n, 0, 20}] (* G. C. Greubel, Jan 28 2020 *)
|
|
|
CROSSREFS
|
Cf. A127126, A127127, A127128, A127129, A127130, A127131, A127132, A127133, A127134.
Sequence in context: A349598 A145089 A218676 * A187651 A005981 A024272
Adjacent sequences: A127132 A127133 A127134 * A127136 A127137 A127138
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Paul D. Hanna, Jan 05 2007
|
|
|
STATUS
|
approved
|
| |
|
|
