A228516 Nonlinear recursion : a(n) = a(n-1) + product( a(n-2*i+1) - (-1)^i a(n-2*i), i=1..(n-1)/2 ).

0, 1, 2, 5, 12, 29, 152, 3953, 492448, 1038466939, 485738447955340, 901906261391592783534445, 457307375301782078171714403359859659770, 230566622864824019056608840739200225506169862419626347928975335

Offset

0,3

Comments

Initial conditions: a(0)=0; a(1)=1;

Links

Table of n, a(n) for n=0..13.

Mathematica

a[0]:= 0; a[1]:= 1; a[n_Integer]:=a[n]=a[n-1]+ Times@@Table[(a[n-2i+1]-(-1)^i a[n-2i]), {i, 1, (n-1)/2}];
Table[a[n], {n, 0, 13}]

Crossrefs

Sequence in context: A368984 A324787 A333888 * A101411 A042789 A291253

Adjacent sequences: A228513 A228514 A228515 * A228517 A228518 A228519

Keyword

nonn

Author

Olivier Gérard, Aug 24 2013

Status

approved