OFFSET
1,1
LINKS
Robert Price, Table of n, a(n) for n = 1..1000
FORMULA
a(n) = sum(k = 1 .. n, prime(k)^12).
MATHEMATICA
Table[Sum[Prime[k]^12, {k, n}], {n, 1000}]
Accumulate[Prime[Range[20]]^12] (* Harvey P. Dale, Jan 31 2014 *)
PROG
(PARI) s=[]; for(n=1, 15, s=concat(s, sum(i=1, n, prime(i)^12))); s \\ Colin Barker, Jan 20 2014
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Robert Price, Jan 20 2014
STATUS
approved