|
%I #15 Feb 26 2024 10:59:34
%S -6,-7,-5,31,37,1111,43,39991,1297,46441,1555,51828151,1261,
%T 1865813431,55987,1950271,1679617,2418094206391,46873,87051391430071,
%U 1634221,2527867231,72559411,112818603293371831,1678321
%N Cyclotomic polynomials at x=-6.
%H Paolo Xausa, <a href="/A020505/b020505.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Cy#CyclotomicPolynomialsValuesAtX">Index entries for cyclotomic polynomials, values at X</a>
%p with(numtheory,cyclotomic); f := n->subs(x=-6,cyclotomic(n,x)); seq(f(i),i=0..64);
%t Join[{-6}, Cyclotomic[Range[50], -6]] (* _Paolo Xausa_, Feb 26 2024 *)
%K sign
%O 0,1
%A _Simon Plouffe_
|
