|
|
A131591
|
|
Sum of the squares of the first 3^n primes.
|
|
0
|
|
|
4, 38, 1556, 86606, 4083404, 171658094, 6716224724, 247782290006, 8763080657420, 299863491723614, 9990667099305740, 325847250824377382, 10445562407382412028, 330039152364735149222, 10301457052184951857604, 318211810358946705058382
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
EXAMPLE
|
The sum of the squares of the first 3^1 primes = 4+9+25 = 38, the second entry in the sequence.
|
|
MATHEMATICA
|
nn=15; With[{prsq=Prime[Range[3^nn]]^2}, Table[Total[Take[prsq, 3^n]], {n, 0, nn}]] (* Harvey P. Dale, Mar 08 2014 *)
|
|
PROG
|
(PARI) sumprimesq(n, b) = { local(x, y, s, a); for(y=0, n, s=0; for(x=1, b^y, s+=prime(x)^2; ); print1(s", "); ) }
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|