|
|
A085739
|
|
Partial sums of A034953(n).
|
|
2
|
|
|
3, 9, 24, 52, 118, 209, 362, 552, 828, 1263, 1759, 2462, 3323, 4269, 5397, 6828, 8598, 10489, 12767, 15323, 18024, 21184, 24670, 28675, 33428, 38579, 43935, 49713, 55708, 62149, 70277, 78923, 88376, 98106, 109281, 120757, 133160, 146526, 160554
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(3)=T(2)+T(3)+T(5)=3+6+15=24
|
|
MATHEMATICA
|
Accumulate[(#(#+1))/2&/@Prime[Range[50]]] (* Harvey P. Dale, Dec 01 2015 *)
|
|
PROG
|
(PARI) s=0; forprime(p=2, 300, s+=t(p); print1(s", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|