A157493 Apply partial sum operator thrice to sequence of squares of the first n primes.

4, 21, 76, 218, 568, 1295, 2688, 5108, 9084, 15457, 25188, 39646, 60512, 89635, 129224, 182088, 251708, 341805, 456868, 601938, 782344, 1004327, 1274776, 1601612, 1994244, 2462873, 3018108, 3671398, 4434624, 5320555, 6345320

Offset

1,1

Links

Table of n, a(n) for n=1..31.

Mathematica

s0=s1=s2=0; Table[s0+=Prime[n]^2; s1+=s0; s2+=s1, {n, 100}]
Nest[Accumulate, Prime[Range[40]]^2, 3]  (* Harvey P. Dale, Jan 27 2011 *)

Crossrefs

Cf. A001223, A014148, A014150, A061789, A069482, A129701, A157492.

Sequence in context: A184706 A034960 A240372 * A192429 A354172 A280434

Adjacent sequences: A157490 A157491 A157492 * A157494 A157495 A157496

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Mar 01 2009

Status

approved