A177822 Sub-triangle of A008292: terms with square indices.

1, 1, 1, 1, 4, 1, 11, 1, 26, 1, 1, 57, 57, 1, 120, 1191, 1, 247, 15619, 1, 502, 156190, 1, 1013, 1310354, 1, 1, 2036, 9738114, 2036

Offset

0,5

Comments

Row sums are {1, 2, 5, 12, 28, 115, 1312, 15867, 156693, 1311369, 9742187,...}.

Links

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

Example

{1},
{1, 1},
{1, 4},
{1, 11},
{1, 26, 1},
{1, 57, 57},
{1, 120, 1191},
{1, 247, 15619},
{1, 502, 156190},
{1, 1013, 1310354, 1},
{1, 2036, 9738114, 2036}

Mathematica

<< DiscreteMath`Combinatorica`
a = Table[Table[Eulerian[n + 1, m^2], {m, 0, Floor[Sqrt[n]]}], {n, 0, 10}];
Flatten[%]

Crossrefs

Cf. A008292,A003099

Sequence in context: A244608 A115022 A230534 * A091156 A092288 A111964

Adjacent sequences: A177819 A177820 A177821 * A177823 A177824 A177825

Keyword

nonn,tabf

Author

Roger L. Bagula, Dec 13 2010

Extensions

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

Status

approved