|
| |
|
|
A152597
|
|
Where records occur in A001917.
|
|
1
| |
|
|
2, 4, 11, 21, 31, 110, 124, 185, 279, 399, 716, 1028, 4552, 6207, 6543, 11424, 11557, 12251, 16199, 23043, 43390, 155798, 203095, 457523, 699782, 865318
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
EXAMPLE
| First few terms of A001917 (has offset 2) are 1, 1, 2, 1, 1, 2, 1, 2, 1, 6, so a(1) to a(3) are 2, 4, 11.
|
|
|
PROG
| (MAGMA) W:=[]; r:=0; for n in [2..100000] do p:=NthPrime(n); a:=(p-1)/Modorder(2, p); if r lt a then r:=a; Append(~W, n); end if; end for; print W;
|
|
|
CROSSREFS
| Cf. A001917 ((p-1)/x, where p = prime(n) and x = smallest positive integer such that 2^x == 1 mod p), A152598 (records in A001917).
Sequence in context: A076636 A011954 A026275 * A126972 A018774 A102608
Adjacent sequences: A152594 A152595 A152596 * A152598 A152599 A152600
|
|
|
KEYWORD
| more,nonn
|
|
|
AUTHOR
| Klaus Brockhaus (klaus-brockhaus(AT)t-online.de), Dec 09 2008
|
| |
|
|
