[go: up one dir, main page]

login
A194600
Record values in A194591.
13
0, 1, 2, 4, 5, 6, 11, 18, 20, 28, 70, 106, 208, 726, 910, 2906, 7431, 14073, 22394, 41422, 82587, 85461, 356981
OFFSET
1,3
COMMENTS
Indices of records are given by A217892.
REFERENCES
Wilfrid Keller, personal communication, 2010.
LINKS
Chris K. Caldwell, The List of Largest Known Primes, 1355477231 * 2^356981 + 1
Carlos Rivera, Problem 30
EXAMPLE
A194591(59) = 5 since A194591(109) = 6 is the next record value.
MATHEMATICA
l = -1; Flatten[Table[k = 0; While[! PrimeQ[n*2^k - 1] && ! PrimeQ[n*2^k + 1], k++]; If[k > l, l = k, {}], {n, 10^5}]] (* Arkadiusz Wesolowski, Sep 04 2011 *)
KEYWORD
more,nonn
AUTHOR
EXTENSIONS
a(23)=A194637(22) from Wilfrid Keller, added by Max Alekseyev, Oct 18 2014
STATUS
approved