OFFSET
1,5
COMMENTS
Row sums are A168562.
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
KEYWORD
nonn,tabl
AUTHOR
Roger L. Bagula, Dec 13 2010
STATUS
approved