|
|
A254784
|
|
Apply partial sum operator 5 times to primes.
|
|
7
|
|
|
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
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
With[{nn=5}, Nest[Accumulate[#]&, Prime[Range[50]], nn]]
|
|
PROG
|
(Haskell)
a254784 n = a254784_list !! (n-1)
a254784_list = (iterate (scanl1 (+)) a000040_list) !! 5
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|