|
Search: id:A035003
|
|
| |
|
| 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
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
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.
Adjacent sequences: A035000 A035001 A035002 this_sequence A035004 A035005 A035006
Sequence in context: A056355 A056356 A084708 this_sequence A143879 A056293 A056294
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
Erich Friedman (erich.friedman(AT)stetson.edu)
|
|
|
Search completed in 0.002 seconds
|
