login
A064699
Integers for which the smallest m in A040076 such that n*2^m+1 is prime (A050921) increases.
7
1, 3, 7, 17, 19, 31, 47, 383, 2897, 3061, 4847, 5359, 10223
OFFSET
1,2
COMMENTS
Where records occur in A040076. A103964 gives the record values.
MATHEMATICA
a = -1; Do[m = 0; While[ !PrimeQ[n*2^m + 1], m++ ]; If[m > a, a = m; Print[n]], {n, 1, 10^3} ]
CROSSREFS
Sequence in context: A140863 A076194 A167168 * A113304 A194945 A093651
KEYWORD
more,nonn
AUTHOR
Robert G. Wilson v, Oct 16 2001
EXTENSIONS
Corrected and extended by T. D. Noe, Nov 15 2010
a(13) was found by PrimeGrid, added by Arkadiusz Wesolowski, Feb 13 2017
STATUS
approved