|
| |
|
|
A122125
|
|
Indices n such that A122103[n] = Sum[ Prime[k]^5, {k,1,n}] is a prime.
|
|
2
|
|
|
|
66, 148, 150, 164, 174, 214, 238, 264, 312, 328, 354, 440, 516, 536, 616, 624, 724, 744, 774, 836, 940, 1002, 1030, 1034, 1038, 1064, 1086, 1092, 1108, 1162, 1322, 1394, 1424, 1468, 1500, 1630, 1654, 1668, 1684, 1694, 1840, 1886, 1980
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
Corresponding primes of form Sum[ Prime[k]^5, {k,1,n} ] are listed in A122126[n] = {32353461605953,9874820441996857,10821208357045699,...}.
|
|
|
LINKS
|
Table of n, a(n) for n=1..43.
|
|
|
MATHEMATICA
|
Select[Range[2000], PrimeQ[Sum[Prime[k]^5, {k, 1, #1}]]&]
|
|
|
CROSSREFS
|
Cf. A122103, A122126.
Sequence in context: A278126 A044317 A044698 * A278783 A358102 A258966
Adjacent sequences: A122122 A122123 A122124 * A122126 A122127 A122128
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Alexander Adamchuk, Aug 20 2006
|
|
|
STATUS
|
approved
|
| |
|
|
