A194607 Record values in A194606.
0, 1, 2, 4, 5, 6, 11, 17, 20, 28, 70, 99, 150, 726, 7431, 22394, 85461, 191207
Offset: 1
Examples
A194606(53) = 11 since A194606(115) = 17 is the next record value.
References
- Wilfrid Keller, personal communication, 2010.
Links
- Chris K. Caldwell, The List of Largest Known Primes, 270704167 * 2^85461 - 1
- Chris K. Caldwell, The List of Largest Known Primes, 3296757029 * 2^191207 + 1
- Carlos Rivera, Problem 30
Crossrefs
Programs
-
Mathematica
l = -1; Flatten[Table[p = Prime[n]; k = 0; While[! PrimeQ[p*2^k - 1] && ! PrimeQ[p*2^k + 1], k++]; If[k > l, l = k, {}], {n, 10^4}]] (* Arkadiusz Wesolowski, Sep 04 2011 *)
Comments