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

Author

Max Alekseyev, May 13 2009

Keywords

• nonn

Comments

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

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.

Crossrefs

Subsequence of A013594 and A046887.

See also A013595, A262404, A262405, A278567.

Programs

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 *)

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

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.