A110578 {a(2,n)}, where a(m,n) is as defined in sequence A110576.

1, 3, 7, 18, 58, 230, 1050, 5277, 28613, 165895, 1023073, 6682569, 46054782, 333712277, 2534298321, 20114189445, 166423322294, 1432251611705, 12795182247109, 118443504257081, 1134237257303476, 11219647646806519

Offset

0,2

Links

G. C. Greubel, Table of n, a(n) for n = 0..570

Mathematica

a[0, 0] := 1; a[0, 1] := 1; a[0, n_] := a[0, n] = Sum[Binomial[2*n - k - 3, n - 2]*a[0, k], {k, 0, n - 1}]; a[1, 0] := 1; a[1, n_] := a[1, n] = a[1, n - 1] + a[0, n]; a[2, 0] := 1; a[2, n_] := a[2, n] = a[2, n - 1] + a[1, n]; Table[a[2, n], {n, 0, 50}] (* G. C. Greubel, Sep 01 2017 *)

Crossrefs

Cf. A110576, A110577, A110579, A110580.

Sequence in context: A062416 A366578 A259885 * A134045 A079898 A173449

Adjacent sequences: A110575 A110576 A110577 * A110579 A110580 A110581

Keyword

easy,nonn

Author

Leroy Quet, Jul 28 2005

Extensions

More terms from Ryan Propper, Sep 25 2005

Status

approved