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 A130759 #7 May 16 2018 09:31:10 %S A130759 1,3,5,7,11,21,43,87,173,343,683,1365,2731,5463,10925,21847,43691, %T A130759 87381,174763,349527,699053,1398103,2796203,5592405,11184811,22369623, %U A130759 44739245,89478487,178956971,357913941,715827883,1431655767,2863311533 %N A130759 Partial sums of A130707. %p A130759 A130707 := proc(n) option remember ; if n <= 2 then op(n+1,[1,2,2]) ; else 3*(A130707(n-1)-A130707(n-2))+2*A130707(n-3) ; fi ; end: A130759 := proc(n) add(A130707(i),i=0..n) ; end: seq(A130759(n),n=0..40) ; # _R. J. Mathar_, Oct 28 2007 %t A130759 Accumulate[LinearRecurrence[{3,-3,2},{1,2,2},40]] (* _Harvey P. Dale_, May 16 2018 *) %K A130759 nonn %O A130759 0,2 %A A130759 _Paul Curtz_, Jul 13 2007 %E A130759 Better definition and more terms from _R. J. Mathar_, Oct 28 2007