The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A368385 Indices of records in A364054. 3
 1, 2, 3, 4, 6, 8, 9, 10, 12, 14, 16, 18, 20, 22, 23, 25, 27, 28, 29, 63, 65, 67, 69, 71, 73, 75, 77, 79, 80, 83, 84, 86, 88, 91, 93, 95, 97, 100, 104, 108, 110, 112, 114, 151, 167, 169, 170, 177, 182, 189, 192, 195, 197, 200, 202, 305, 307, 352, 353, 355, 369, 375, 380, 385, 388, 391, 395, 397, 412, 416, 421, 429, 432 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,2 LINKS Michael De Vlieger, Table of n, a(n) for n = 1..10000 MATHEMATICA nn = 2^20; c[_] := False; m[_] := 0; s = 0; a[1] = j = 1; c[0] = c[1] = True; {1}~Join~Reap[Monitor[Do[p = Prime[n - 1]; r = Mod[j, p]; While[Set[k, p m[p] + r]; c[k], m[p]++]; Set[{c[k], j}, {True, k}]; If[k > s, s = k; Sow[n]], {n, 2, nn}], n] ][[-1, 1]] (* Michael De Vlieger, Mar 05 2024 *) CROSSREFS Cf. A364054, A368384. Sequence in context: A035033 A054219 A196277 * A280196 A143896 A160719 Adjacent sequences: A368382 A368383 A368384 * A368386 A368387 A368388 KEYWORD nonn AUTHOR N. J. A. Sloane, Mar 05 2024 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified August 8 09:31 EDT 2024. Contains 375018 sequences. (Running on oeis4.)