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 A082694 #8 Nov 21 2013 12:48:00
%S A082694 1,3,4,6,10,12,13,15,19,27,31,33,34,36,40,48,64,72,76,78,79,81,85,93,
%T A082694 109,141,157,165,169,171,172,174,178,186,202,234,298,330,346,354,358,
%U A082694 360,361,363,367,375,391,423,487,615,679,711,727,735,739,741,742,744
%N A082694 Partial sums of A082693.
%t A082694 f[n_]:=Module[{st=2^Range[0,n]},Join[st,Reverse[Most[Rest[st]]]]]; Accumulate[ Flatten[Array[f,10]]] (* _Harvey P. Dale_, May 09 2012 *)
%K A082694 nonn
%O A082694 1,2
%A A082694 _Benoit Cloitre_, Apr 12 2003