%I #19 Feb 08 2015 17:42:57
%S 2,9,26,60,122,225,386,624,962,1429,2056,2880,3942,5285,6956,9008,
%T 11500,14493,18054,22254,27166,32869,39446,46986,55586,65347,76372,
%U 88768,102644,118113,135302,154342,175370
%N Apply partial sum operator thrice to primes.
%C Row 3 in A254858. - _Reinhard Zumkeller_, Feb 08 2015
%H Reinhard Zumkeller, <a href="/A014150/b014150.txt">Table of n, a(n) for n = 1..10000</a>
%t lst={};s1=0;s2=0;s3=0;Do[s1=s1+Prime[n];s2=s2+s1;s3=s3+s2;AppendTo[lst, s3], {n, 5!}];lst (* _Vladimir Joseph Stephan Orlovsky_, Sep 15 2008 *)
%t With[{nn=3},Nest[Accumulate[#]&,Prime[Range[50]],nn]] (* _Harvey P. Dale_, Feb 07 2015 *)
%o (Haskell)
%o a014150 n = a014150_list !! (n-1)
%o a014150_list = (iterate (scanl1 (+)) a000040_list) !! 3
%o -- _Reinhard Zumkeller_, Feb 08 2015
%Y Cf. A000040.
%Y Cf. A007504, A014148, A178138, A254784.
%Y Cf. A254858.
%K nonn
%O 1,1
%A _N. J. A. Sloane_
%E Offset fixed by _Reinhard Zumkeller_, Feb 08 2015