A159346 Triangle read by rows: every third term of every third row of A008292.

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, ...

Links

G. C. Greubel, Rows n = 0..100 of triangle, flattened

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

Cf. A008292, A085503.

Sequence in context: A283783 A260274 A234126 * A256835 A237940 A097030

Adjacent sequences: A159343 A159344 A159345 * A159347 A159348 A159349

Keyword

nonn,tabl

Author

Roger L. Bagula, Dec 13 2010

Extensions

Edited by N. J. A. Sloane, Jan 01 2011

Status

approved