|
| |
|
|
A122128
|
|
Primes of form Sum[ Prime[k]^4, {k,1,n} ] or primes in A122102[n].
|
|
1
|
|
|
|
97, 1567204831, 771745495049, 2523423764749, 7766703722053, 16167518745751, 28962816187367, 42932141486099, 65562552714433, 109392979058371, 142311158323421, 194472382292633, 434809071709709, 654363068549089
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
COMMENTS
|
A122102[n] = Sum[ Prime[k]^4, {k,1,n} ] begins {16,97,722,3123,17764,46325,...}. Indices n such that A122102[n] is prime are listed in A122127[n] = {2,32,90,110,134,152,168,180,194,212,222,234,270,290,300,...}.
|
|
|
LINKS
|
Table of n, a(n) for n=1..14.
|
|
|
FORMULA
|
a(n) = A122102[ A122127[n] ].
|
|
|
MATHEMATICA
|
Select[Table[Sum[Prime[k]^4, {k, 1, n}], {n, 1, 700}], PrimeQ[ #1]&]
|
|
|
CROSSREFS
|
Cf. A122102, A122127.
Sequence in context: A186167 A322606 A145309 * A114430 A258765 A033418
Adjacent sequences: A122125 A122126 A122127 * A122129 A122130 A122131
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Alexander Adamchuk, Aug 20 2006
|
|
|
STATUS
|
approved
|
| |
|
|
