login
A355963
Primes p such that (p+8)^(p-1) == 1 (mod p^2).
6
1531, 7445287
OFFSET
1,1
COMMENTS
a(3) > 34294200797 if it exists.
PROG
(PARI) forprime(p=1, , if(Mod(p+8, p^2)^(p-1)==1, print1(p, ", ")))
CROSSREFS
(p+k)^(p-1) == 1 (mod p^2): A355959 (k=2), A355960 (k=5), A355961 (k=6), A355962 (k=7), A355964 (k=9), A355965 (k=10).
Sequence in context: A057328 A110022 A339075 * A306850 A296781 A278192
KEYWORD
nonn,hard,more,bref
AUTHOR
Felix Fröhlich, Jul 21 2022
STATUS
approved