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 A107957 #3 Mar 30 2012 18:36:46 %S A107957 1,3,6,11,17,25,36,52,69,88,110,137,170,211,263,331,400,471,545,624, %T A107957 709,802,906,1026,1163,1319,1497,1702,1940,2219,2550,2949,3349,3751, %U A107957 4156,4566,4982,5406,5841,6292,6760,7247,7756,8292,8861,9471,10133,10863 %N A107957 Partial sums of A107947. %C A107957 Terms at positions 2^k is found in A107958. %F A107957 a(n) = A107947(2^m + n) - A107947(2^m) when n <= 2^(m-1). %e A107957 a(3) = 6 = 22 - 16 = A107947(2^3 + 3) - A107947(2^3). %e A107957 a(5) = 17 = 85 - 68 = A107947(2^4 + 5) - A107947(2^4). %e A107957 a(8) = 52 = 120 - 68 = A107947(2^4 + 8) - A107947(2^4). %o A107957 (PARI) {a(n)=local(A=[1,2]);for(i=1,#binary(n), B=vector(#A,k,polcoeff(Ser(A)/(1-x),k-1)+A[2^#binary(#A-1)]); A=concat(A,B););sum(k=1,n,A[k])} %Y A107957 Cf. A107946, A107947, A107948, A107958. %K A107957 nonn %O A107957 0,2 %A A107957 _Paul D. Hanna_, May 29 2005