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 A157492 #9 Jan 01 2020 17:42:32 %S A157492 4,17,55,142,350,727,1393,2420,3976,6373,9731,14458,20866,29123,39589, %T A157492 52864,69620,90097,115063,145070,180406,221983,270449,326836,392632, %U A157492 468629,555235,653290,763226,885931,1024765,1180760,1355524,1549609 %N A157492 Apply partial sum operator twice to sequence of squares of the first n primes. %H A157492 Robert Israel, <a href="/A157492/b157492.txt">Table of n, a(n) for n = 1..10000</a> %p A157492 ListTools:-PartialSums(ListTools:-PartialSums([seq(ithprime(i)^2,i=1..100)])); # _Robert Israel_, May 14 2019 %t A157492 s0=s1=0;lst={};Do[p=Prime[n];s0+=p^2;s1+=s0;AppendTo[lst,s1],{n,5!}];lst %t A157492 Nest[Accumulate,Prime[Range[40]]^2,2] (* _Harvey P. Dale_, Jan 01 2020 *) %Y A157492 Cf. A001223, A014148, A014150, A061789, A069482, A129701. %Y A157492 Partial sums of A024450. %K A157492 nonn %O A157492 1,1 %A A157492 _Vladimir Joseph Stephan Orlovsky_, Mar 01 2009