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 A144463 #3 Oct 12 2012 14:54:55
%S A144463 1,1,1,1,4,1,1,6,6,1,1,8,24,8,1,1,10,40,40,10,1,1,12,60,160,60,12,1,1,
%T A144463 14,84,280,280,84,14,1,1,16,112,448,1120,448,112,16,1,1,18,144,672,
%U A144463 2016,2016,672,144,18,1,1,20,180,960,3360,8064,3360,960,180,20,1
%N A144463 Triangle T(n,m) read by rows: T(n,m)= A013609(n,m) if m <= n/2, T(n,m)= T(n,n-m) otherwise.
%C A144463 Row sums are 1, 2, 6, 14, 42, 102, 306, 758, 2274, 5702, 17106,...
%e A144463 T(n,m) = 2^m*binomial(n,m) if 0 <= m <= n/2, T(n,m)= 2^(n-m)*binomial(n,m) if n/2 <= m <= n.
%e A144463 1;
%e A144463 1, 1;
%e A144463 1, 4, 1;
%e A144463 1, 6, 6, 1;
%e A144463 1, 8, 24, 8, 1;
%e A144463 1, 10, 40, 40, 10, 1;
%e A144463 1, 12, 60, 160, 60, 12, 1;
%e A144463 1, 14, 84, 280, 280, 84, 14, 1;
%e A144463 1, 16, 112, 448, 1120, 448, 112, 16, 1;
%e A144463 1, 18, 144, 672, 2016, 2016, 672, 144, 18, 1;
%e A144463 1, 20, 180, 960, 3360, 8064, 3360, 960, 180, 20, 1;
%t A144463 Clear[f, t]; f[n_, m_] = If[m <= Floor[n/2], m, n - m]; t[n_, m_] = Binomial[n, m]*2^f[n, m]; Table[Table[t[n, m], {m, 0, n}], {n, 0, 10}]; Flatten[%]
%K A144463 nonn,tabl,easy
%O A144463 0,5
%A A144463 _Roger L. Bagula_ and _Gary W. Adamson_, Oct 09 2008
%E A144463 Offset corrected, keyword:tabl inserted by the Assoc. Eds. of the OEIS, Jun 30 2010