This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A177822 #9 Mar 12 2014 16:37:17 %S A177822 1,1,1,1,4,1,11,1,26,1,1,57,57,1,120,1191,1,247,15619,1,502,156190,1, %T A177822 1013,1310354,1,1,2036,9738114,2036 %N A177822 Sub-triangle of A008292: terms with square indices. %C A177822 Row sums are {1, 2, 5, 12, 28, 115, 1312, 15867, 156693, 1311369, 9742187,...}. %e A177822 {1}, %e A177822 {1, 1}, %e A177822 {1, 4}, %e A177822 {1, 11}, %e A177822 {1, 26, 1}, %e A177822 {1, 57, 57}, %e A177822 {1, 120, 1191}, %e A177822 {1, 247, 15619}, %e A177822 {1, 502, 156190}, %e A177822 {1, 1013, 1310354, 1}, %e A177822 {1, 2036, 9738114, 2036} %t A177822 << DiscreteMath`Combinatorica` %t A177822 a = Table[Table[Eulerian[n + 1, m^2], {m, 0, Floor[Sqrt[n]]}], {n, 0, 10}]; %t A177822 Flatten[%] %Y A177822 Cf. A008292,A003099 %K A177822 nonn,tabf %O A177822 0,5 %A A177822 _Roger L. Bagula_, Dec 13 2010 %E A177822 Edited by _N. J. A. Sloane_, Jan 01 2011