A177823 Triangle of Eulerian numbers squared: A008292(n,m)^2 read by rows.

1, 1, 1, 1, 16, 1, 1, 121, 121, 1, 1, 676, 4356, 676, 1, 1, 3249, 91204, 91204, 3249, 1, 1, 14400, 1418481, 5837056, 1418481, 14400, 1, 1, 61009, 18429849, 243953161, 243953161, 18429849, 61009, 1, 1, 252004, 213393664, 7785238756, 24395316100, 7785238756, 213393664, 252004, 1, 1, 1026169

Offset

1,5

Comments

Row sums are A168562.

Links

Table of n, a(n) for n=1..47.

Example

1;
1, 1;
1, 16, 1;
1, 121, 121, 1;
1, 676, 4356, 676, 1;
1, 3249, 91204, 91204, 3249, 1;
1, 14400, 1418481, 5837056, 1418481, 14400, 1;

Mathematica

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

Crossrefs

Cf. A008292, A014732, A014748, A014765, A168562

Sequence in context: A154228 A141697 A202750 * A142462 A203397 A338029

Adjacent sequences: A177820 A177821 A177822 * A177824 A177825 A177826

Keyword

nonn,tabl

Author

Roger L. Bagula, Dec 13 2010

Status

approved