A010749 Shifts 5 places right under inverse binomial transform.

1, 1, 1, 1, 1, 2, 8, 30, 94, 257, 640, 1505, 3482, 8402, 22660, 70825, 248912, 924764, 3465758, 12813670, 46470377, 165908866, 588617326, 2103688426, 7696710691, 29266242303, 116732304039, 488414436671, 2126002398180, 9511898145938, 43251315994457

Offset

0,6

Links

Alois P. Heinz, Table of n, a(n) for n = 0..300

M. Bernstein and N. J. A. Sloane, Some canonical sequences of integers, Linear Alg. Applications, 226-228 (1995), 57-72; erratum 320 (2000), 210. [Link to arXiv version]

M. Bernstein and N. J. A. Sloane, Some canonical sequences of integers, Linear Alg. Applications, 226-228 (1995), 57-72; erratum 320 (2000), 210. [Link to Lin. Alg. Applic. version together with omitted figures]

N. J. A. Sloane, Transforms

Maple

T:= proc(n, k) option remember; local j; if n<k then if n=0 then 1 else 0 fi else add(binomial(n-k, j) *T(j, k), j=0..n-k) fi end: a:= n-> T(n+5, 5): seq(a(n), n=0..32);  # Alois P. Heinz, Sep 05 2008

Mathematica

T[n_, k_] := T[n, k] = If[n<k, If[n==0, 1, 0], Sum[Binomial[n-k, j]*T[j, k], {j, 0, n-k}]]; a[n_] := T[n+5, 5]; Table[a[n], {n, 0, 32}] (* Jean-François Alcover, Mar 30 2015, after Alois P. Heinz *)

Crossrefs

Column k=5 of A143983 (using a different offset).

Sequence in context: A000162 A052437 A131318 * A299415 A364078 A373904

Adjacent sequences: A010746 A010747 A010748 * A010750 A010751 A010752

Keyword

nonn,eigen

Author

N. J. A. Sloane, Jonas Wallgren

Status

approved