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 A122758 #9 Mar 12 2014 16:36:58
%S A122758 0,2,6,8,24,32,18,54,72,216,32,96,128,384,512,50,150,200,600,800,2400,
%T A122758 72,216,288,864,1152,3456,4608,98,294,392,1176,1568,4704,6272,18816,
%U A122758 128,384,512,1536,2048,6144,8192,24576,32768,162,486,648,1944,2592,7776
%N A122758 Triangle read by rows: T(n,m) = 2*n^2*A084221(n) (n>=0, 0 <= m <= n).
%e A122758 Triangle begins:
%e A122758 0
%e A122758 2, 6
%e A122758 8, 24, 32
%e A122758 18, 54, 72, 216
%e A122758 32, 96, 128, 384, 512
%e A122758 50, 150, 200, 600, 800, 2400
%t A122758 f[n_] := If[Mod[n, 2] == 0, 2^(n + 1), 2^n + 2^(n + 1)]; T[n_, m_] := m^2*f[n]; a = Table[Table[T[n, m], {n, 0, m}], {m, 0, 10}]; Flatten[a]
%Y A122758 Cf. A084221.
%K A122758 nonn,tabl
%O A122758 1,2
%A A122758 _Roger L. Bagula_, Sep 21 2006
%E A122758 Edited by _N. J. A. Sloane_, Jun 23 2009