A254784 Apply partial sum operator 5 times to primes.

2, 13, 50, 147, 366, 810, 1640, 3094, 5510, 9355, 15256, 24037, 36760, 54768, 79732, 113704, 159176, 219141, 297160, 397433, 524872, 685180, 884934, 1131674, 1434000, 1801673, 2245718, 2778531, 3413988, 4167558, 5056430, 6099644, 7318228, 8735337, 10376402

Offset: 1

Author

Harvey P. Dale, Feb 07 2015

Keywords

• easy
• nonn

Comments

Row 5 in A254858. - Reinhard Zumkeller, Feb 08 2015

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A007504, A014148, A014150, A178138.

Cf. A254858.

Programs

Haskell

a254784 n = a254784_list !! (n-1)
a254784_list = (iterate (scanl1 (+)) a000040_list) !! 5
-- Reinhard Zumkeller, Feb 08 2015

Mathematica

With[{nn=5},Nest[Accumulate[#]&,Prime[Range[50]],nn]]