login
A308610
Numbers k such that Sum_{j=1..k} composite(j)^composite(j) is prime, where composite(j) is the j-th composite number.
0
OFFSET
1,1
COMMENTS
If it exists, a(4) > 25800.
EXAMPLE
7 is a term because for the first 7 composites, 4^4 + 6^6 + 8^8 + 9^9 + 10^10 + 12^12 + 14^14 = 11120933330250889 is prime.
MATHEMATICA
f[ n_Integer ] := Block[ {k = n + PrimePi[ n ] + 1}, While[ k - PrimePi[ k ] - 1 != n, k++ ]; k ]; s = 0; Do[ s = s + f[n]^f[n]; If[ PrimeQ[ s ], Print[ n ] ], {n, 1, 1000} ]
CROSSREFS
KEYWORD
nonn,more,bref
AUTHOR
Metin Sariyar, Aug 23 2019
STATUS
approved