login
A063705
Cyclotomic polynomials Phi_n at x=phi, rounded to nearest integer (where phi = tau = (sqrt(5)+1)/2).
4
2, 1, 3, 5, 4, 16, 2, 45, 8, 23, 5, 320, 5, 841, 11, 26, 48, 5776, 15, 15125, 34, 167, 76, 103680, 41, 16626, 199, 5855, 233, 1860496, 56, 4870845, 2208, 7602, 1364, 45081, 305, 87403801, 3571, 51941, 1926, 599074576, 407, 1568397605, 10946, 80321
OFFSET
0,1
MAPLE
with(numtheory); Phi_at_x := (n, y) -> subs(x=y, cyclotomic(n, x)); [seq(round(evalf(simplify(Phi_at_x(j, (sqrt(5)+1)/2)))), j=0..120)];
MATHEMATICA
Join[{2}, Round[Simplify[Cyclotomic[Range[50], GoldenRatio]]]] (* Paolo Xausa, Feb 27 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 03 2001
EXTENSIONS
a(43) corrected by Sean A. Irvine, May 08 2023
STATUS
approved