A035003 Sorted entries in triangle in A014784.

1, 2, 3, 7, 12, 38, 69, 81, 295, 552, 702, 3098, 5901, 7857, 8559, 42271, 81444, 111618, 128034, 726734, 1411197, 1971945, 2339631, 2467665, 15366679, 30006624, 42508638, 51627510, 56434806, 391888514, 768410349, 1099558881

Offset

0,2

Links

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

Mathematica

a[ 1, 1 ]=1; a[ n_, k_ ] := 0 /; (k>n || k<=0); a[ n_, 1 ]=Sum[ a[ n-1, i ], {i, 1, n-1} ] a[ n_, k_ ] := a[ n, k ]=2a[ n, k-1 ]-a[ n, k-2 ]-a[ n-1, k-1 ]-a[ n-1, k-2 ]; Union[ Flatten[ Table[ a[ n, i ], {n, 1, 20}, {i, 1, n} ] ] ]

Crossrefs

Cf. A014784.

Sequence in context: A056355 A056356 A084708 * A143879 A056293 A275311

Adjacent sequences: A035000 A035001 A035002 * A035004 A035005 A035006

Keyword

easy,nonn

Author

Erich Friedman

Status

approved