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 A077039 #21 Apr 27 2025 17:41:47
%S A077039 0,-3,2,-5,-16,-3,14,-5,-28,1,-30,7,48,5,-42,11,-48,13,-54,-125,-52,
%T A077039 -131,-214,-125,-28,73,-30,-137,-28,85,-42,-173,-36,-175,-26,-177,-20,
%U A077039 -183,-350,-177,-356,-175,-366,-173,24,-175,-386,-609,-836,-607,-374,-613,-372,-623
%N A077039 Partial sums of A073579.
%H A077039 Reinhard Zumkeller, <a href="/A077039/b077039.txt">Table of n, a(n) for n = 1..10000</a>
%F A077039 a(n) = -Sum_{k=2..n} A000040(k)*i^(A000040(k)+1) where i is the imaginary unit. - _Anthony Browne_, May 17 2016
%e A077039 a(5) = 2*0+3*(-1)+5*1+7*(-1)+11*(-1) = 0-3+5-7-11 = -16.
%t A077039 Accumulate[Join[{0},If[Mod[#,4]==1,#,-#]&/@Prime[Range[2,60]]]] (* _Harvey P. Dale_, Feb 27 2012 *)
%o A077039 (Haskell)
%o A077039 a077039 n = a077039_list !! (n-1)
%o A077039 a077039_list = scanl1 (+) a073579_list
%o A077039 -- _Reinhard Zumkeller_, Feb 28 2012
%Y A077039 Cf. A007504, A077040, A077041.
%K A077039 sign,look
%O A077039 1,2
%A A077039 _Reinhard Zumkeller_, Oct 21 2002