A160340 Indices of records in heights of cyclotomic polynomials (A160338).

1, 105, 385, 1365, 1785, 2805, 3135, 6545, 10465, 11305, 17255, 20615, 26565, 40755, 106743, 171717, 255255, 279565, 327845, 707455, 886445, 983535, 1181895, 1752465, 3949491, 8070699, 10163195, 13441645, 15069565, 30489585, 37495115, 40324935

Offset

1,2

Comments

m is in this sequence if A160338(k) < A160338(m) for all k<m.

Links

Max Alekseyev, Table of n, a(n) for n = 1..42

John Abbott and Nico Mexis, Cyclotomic Factors and LRS-Degeneracy, arXiv:2403.08751 [math.AC], 2024. See p. 12.

Andrew Arnold and Michael Monagan, Calculating cyclotomic polynomials of very large height.

Lola Thompson, Cyclotomic statistics, Univ. Utrecht (Netherlands, 2024). See pp. 6, 14.

Mathematica

r = 0; Do[If[# > r, r = #; Print[n]] &@ Max@ Abs@ CoefficientList[Cyclotomic[n, x], x], {n, 10^4}] (* Michael De Vlieger, May 20 2024 *)

Prog

(PARI) print1(r=1); for(n=2, 1e4, t=vecmax(abs(Vec(polcyclo(n)))); if(t>r, r=t; print1(", "n))) \\ Charles R Greathouse IV, Jun 28 2012

Crossrefs

Subsequence of A013594 and A046887.

See also A013595, A262404, A262405, A278567.

Sequence in context: A190577 A102792 A013594 * A136418 A134518 A160717

Adjacent sequences: A160337 A160338 A160339 * A160341 A160342 A160343

Keyword

nonn

Author

Max Alekseyev, May 13 2009

Status

approved