[go: up one dir, main page]

login
A159346
Triangle read by rows: every third term of every third row of A008292.
2
1, 1, 1, 1, 2416, 1, 1, 455192, 455192, 1, 1, 45533450, 2275172004, 45533450, 1, 1, 3572085255, 3207483178157, 3207483178157, 3572085255, 1, 1, 251732291184, 2527925001876036, 37307713155613000, 2527925001876036, 251732291184, 1, 1, 16871482830550, 1454842842001939656
OFFSET
0,5
COMMENTS
Row sums are 1, 2, 2418, 910386, 2366238906, 6422110526826, 42364066623947442, 365177884120263581634, 5244467282898658636883274,
100806053706495867884737652154, 2753506371613138713078675746891778, ...
EXAMPLE
{1},
{1, 1},
{1, 2416, 1},
{1, 455192, 455192, 1},
1, 45533450, 2275172004, 45533450, 1},
{1, 3572085255, 3207483178157, 3207483178157, 3572085255, 1}
MATHEMATICA
<< DiscreteMath`Combinatorica`
k = 3;
a = Table[Table[Eulerian[n + 1, k*m], {m, 0, Floor[n/k]}], {n, 0, 10*k, k}];
Flatten[%]
CROSSREFS
Sequence in context: A260274 A376352 A234126 * A256835 A237940 A097030
KEYWORD
nonn,tabl
AUTHOR
Roger L. Bagula, Dec 13 2010
EXTENSIONS
Edited by N. J. A. Sloane, Jan 01 2011
STATUS
approved