

A284649


Primes p such that 2^(p1) mod p^2 < p+2.


0




OFFSET

1,1


COMMENTS

a(9) > 10^12.  Giovanni Resta, Mar 31 2017


LINKS

Table of n, a(n) for n=1..8.


PROG

(PARI) forprime(p=2, 1e10, a=lift(Mod(2, p^2)^(p1)); if(a<p+2, print1(p", ")))


CROSSREFS

Cf. A001220, A121999, A125854, A196202.
Sequence in context: A041193 A042335 A218995 * A141192 A215135 A059453
Adjacent sequences: A284646 A284647 A284648 * A284650 A284651 A284652


KEYWORD

nonn,more


AUTHOR

Gionata Neri, Mar 31 2017


STATUS

approved



