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 A233969 #14 Oct 27 2016 17:18:44
%S A233969 1,2,3,5,8,12,17,24,34,47,63,84,112,147,190,245,315,401,506,636,797,
%T A233969 993,1229,1516,1866,2286,2787,3389,4111,4969,5985,7191,8622,10309,
%U A233969 12290,14621,17362,20568,24308,28676,33772,39694,46562,54529,63762,74432,86738
%N A233969 Partial sums of A006950.
%C A233969 The first three columns of A211970 are A211971, A000041, A006950, so for k = 0..2, the partial sums of column k of A211970 give: A015128, A000070, this sequence.
%H A233969 Alois P. Heinz, <a href="/A233969/b233969.txt">Table of n, a(n) for n = 0..1000</a>
%F A233969 a(n) ~ exp(Pi*sqrt(n/2))/(2*Pi*sqrt(n)). - _Vaclav Kotesovec_, Oct 27 2016
%p A233969 b:= proc(n, i) option remember; `if`(n=0, 1, `if`(i<1, 0,
%p A233969 b(n, i-1)+`if`(i>n, 0, b(n-i, i-irem(i, 2)))))
%p A233969 end:
%p A233969 a:= proc(n) option remember; b(n, n) +`if`(n>0, a(n-1), 0) end:
%p A233969 seq(a(n), n=0..50); # _Alois P. Heinz_, Jan 12 2014
%t A233969 Accumulate[CoefficientList[Series[x*QPochhammer[-1/x, x^2]/((1 + x) * QPochhammer[x^2]), {x, 0, 50}], x]] (* _Vaclav Kotesovec_, Oct 27 2016 *)
%Y A233969 Cf. A000041, A000070, A015128, A195825, A195826, A195836, A210843, A211970, A211971, A233758, A233759.
%K A233969 nonn
%O A233969 0,2
%A A233969 _Omar E. Pol_, Jan 12 2014