login
A284649
Primes p such that 2^(p-1) mod p^2 < p+2.
0
2, 3, 29, 37, 1093, 3373, 3511, 2001907169
OFFSET
1,1
COMMENTS
a(9) > 10^12. - Giovanni Resta, Mar 31 2017
PROG
(PARI) forprime(p=2, 1e10, a=lift(Mod(2, p^2)^(p-1)); if(a<p+2, print1(p", ")))
CROSSREFS
Union of A001220 and A125854.
Sequence in context: A041193 A042335 A218995 * A141192 A215135 A059453
KEYWORD
nonn,more
AUTHOR
Gionata Neri, Mar 31 2017
STATUS
approved