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 A177811 #15 Feb 08 2023 09:30:40 %S A177811 1,1,1,1,156190,1,1,423281535,423281535,1,1,473353301060, %T A177811 114890380658550,473353301060,1,1,382493246941965,5119020713873609970, %U A177811 5119020713873609970,382493246941965,1,1,269025107855605626,101955892318210543172751,4179647109945703200884716,101955892318210543172751,269025107855605626,1 %N A177811 Sub-triangle of Eulerian numbers A008292, taking every 4th term of every 4th row. %C A177811 Row sums are: 1, 2, 156192, 846563072, 115837087260672, ... . %e A177811 {1}, %e A177811 {1, 1}, %e A177811 {1, 156190, 1}, %e A177811 {1, 423281535, 423281535, 1}, %e A177811 {1, 473353301060, 114890380658550, 473353301060, 1}, %e A177811 {1, 382493246941965, 5119020713873609970, 5119020713873609970, 382493246941965, 1} %t A177811 << DiscreteMath`Combinatorica` %t A177811 k = 4; %t A177811 a = Table[Table[Eulerian[n + 1, k*m], {m, 0, Floor[n/k]}], {n, 0, 10*k, k}]; %t A177811 Flatten[%] %Y A177811 Cf. A008292, A085503, A159346. %K A177811 nonn,tabl,less %O A177811 0,5 %A A177811 _Roger L. Bagula_, Dec 13 2010