|
|
A103964
|
|
Record values in A040076.
|
|
8
|
|
|
0, 1, 2, 3, 6, 8, 583, 6393, 9715, 33288, 3321063, 5054502, 31172165
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
The index sequence of this sequence is 1, 3, 7, 17, 19, 31, 47, 383, 2897. A040076(2897)>8192, not yet found.
A064699 gives where the records occur.
|
|
LINKS
|
|
|
EXAMPLE
|
|
|
MATHEMATICA
|
k = -1; n = 0; km = k; While[k < 8192, n++; k = 0; cp = n*(2^ k) + 1; While[(! PrimeQ[cp]) && (k < 8192), k++; cp = n*(2^k) + 1]; If[k > km, km = k; Print[{n, km}]]]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|