A250217 Numbers k such that A085398(k) sets a new record value.

1, 11, 18, 23, 25, 37, 68, 113, 115, 179, 229, 421, 545, 1129, 1451, 1481, 1847, 1987, 3099, 3329, 4391

Offset

1,2

Comments

Record values at positions A085398(a(n)): {3, 5, 6, 10, 22, 61, 85, 86, 268, 304, 606, 808, ...}. - Michael De Vlieger, May 20 2017

Links

Table of n, a(n) for n=1..21.

Mathematica

Function[s, Function[t, Map[Position[s, #][[1, 1]] &, t]]@ Union@ FoldList[Max, s]]@ Table[k = 2; While[! PrimeQ[Cyclotomic[n, k]], k++]; k, {n, 500}] (* Michael De Vlieger, May 20 2017, after Eric Chen at A085398 *)

Crossrefs

Cf. A085398, A250218.

Sequence in context: A095648 A273679 A250192 * A335278 A151748 A003334

Adjacent sequences: A250214 A250215 A250216 * A250218 A250219 A250220

Keyword

nonn,more

Author

Eric Chen, Dec 24 2014

Extensions

Corrected by insertion of 421. - Robert G. Wilson v, May 19 2017

a(17)-a(21) from Jinyuan Wang, Dec 17 2022

Status

approved