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 A118124 #3 Mar 30 2012 17:34:21 %S A118124 41,43,47,47,53,61,53,61,71,83,61,71,83,97,113,71,83,97,113,131,151, %T A118124 83,97,113,131,151,173,197,97,113,131,151,173,197,223,251,113,131,151, %U A118124 173,197,223,251,281,313,131,151,173,197,223,251,281,313,347,383,151,173 %N A118124 Triangle T(n,m) = (n+m)^2+n+m+41, read by rows. %C A118124 Defined to display A005846(d) in the d-th antidiagonal, d sufficiently small. %e A118124 41; %e A118124 43, 47; %e A118124 47, 53, 61; %e A118124 53, 61, 71, 83; %e A118124 61, 71, 83, 97, 113; %e A118124 71, 83, 97, 113, 131, 151; %e A118124 83, 97, 113, 131, 151, 173, 197; %e A118124 97, 113, 131, 151, 173, 197, 223, 251; %e A118124 113, 131, 151, 173, 197, 223, 251, 281, 313; %e A118124 131, 151, 173, 197, 223, 251, 281, 313, 347, 383; %e A118124 151, 173, 197, 223, 251, 281, 313, 347, 383, 421, 461; %t A118124 f[n_] = n^2 + n + 41 t[n_, m_] = f[n + m] a = Table[Table[t[n, m], {n, 0, m}], {m, 0, 10}] c = Flatten[a] %Y A118124 Cf. A014556. %K A118124 nonn,less,tabl %O A118124 0,1 %A A118124 _Roger L. Bagula_, May 12 2006 %E A118124 Keyword:less and reference to A005846, A014556 added - The Assoc. Eds. of the OEIS, Oct 20 2010