[go: up one dir, main page]

login
A063707
Cyclotomic polynomials Phi_n at x=phi, ceiled up (where phi = tau = (sqrt(5)+1)/2).
4
2, 1, 3, 6, 4, 17, 2, 46, 8, 24, 5, 321, 6, 842, 12, 26, 48, 5777, 15, 15126, 35, 167, 77, 103681, 42, 16627, 200, 5856, 234, 1860497, 57, 4870846, 2208, 7602, 1365, 45081, 306, 87403802, 3572, 51941, 1927, 599074577, 408, 1568397606, 10947, 80321
OFFSET
0,1
MAPLE
with(numtheory); Phi_at_x := (n, y) -> subs(x=y, cyclotomic(n, x)); [seq(ceil(evalf(simplify(Phi_at_x(j, (sqrt(5)+1)/2)))), j=0..120)];
MATHEMATICA
Join[{2}, Ceiling[Simplify[Cyclotomic[Range[50], GoldenRatio]]]] (* Paolo Xausa, Feb 27 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Antti Karttunen, Aug 03 2001
STATUS
approved