|
%I #17 Feb 26 2024 10:09:29
%S 13,12,14,183,170,30941,157,5229043,28562,4829007,26521,149346699503,
%T 28393,25239592216021,4482037,753327121,815730722,720867993281778161,
%U 4824613,121826690864620509223,810932305
%N Cyclotomic polynomials at x=13.
%H Robert Israel, <a href="/A019331/b019331.txt">Table of n, a(n) for n = 0..906</a>
%H <a href="/index/Cy#CyclotomicPolynomialsValuesAtX">Index entries for cyclotomic polynomials, values at X</a>
%p with(numtheory,cyclotomic); f := n->subs(x=13,cyclotomic(n,x)); seq(f(i),i=0..64);
%t Join[{13}, Cyclotomic[Range[30], 13]] (* _Paolo Xausa_, Feb 26 2024 *)
%K nonn
%O 0,1
%A _Simon Plouffe_
|
