A110577 {a(1,n)}, where a(m,n) is defined in sequence A110576.

1, 2, 4, 11, 40, 172, 820, 4227, 23336, 137282, 857178, 5659496, 39372213, 287657495, 2200586044, 17579891124, 146309132849, 1265828289411, 11362930635404

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]; Table[a[1, n], {n, 0, 50}] (* G. C. Greubel, Aug 31 2017 *)

Crossrefs

Cf. A110576, A110578, A110579, A110580.

Sequence in context: A173938 A242790 A013044 * A335441 A012948 A013182

Adjacent sequences: A110574 A110575 A110576 * A110578 A110579 A110580

Keyword

easy,nonn

Author

Leroy Quet, Jul 28 2005

Extensions

More terms from Ryan Propper, Sep 25 2005

Status

approved