A019321 Cyclotomic polynomials at x=3.

3, 2, 4, 13, 10, 121, 7, 1093, 82, 757, 61, 88573, 73, 797161, 547, 4561, 6562, 64570081, 703, 581130733, 5905, 368089, 44287, 47071589413, 6481, 3501192601, 398581, 387440173, 478297, 34315188682441, 8401, 308836698141973, 43046722, 2413941289, 32285041

Offset: 0

Author

Simon Plouffe

Keywords

• nonn

Links

• Paolo Xausa, Table of n, a(n) for n = 0..1000
• Index entries for cyclotomic polynomials, values at X

Programs

Maple

with(numtheory,cyclotomic); f := n->subs(x=3,cyclotomic(n,x)); seq(f(i),i=0..64);

Mathematica

Join[{3}, Cyclotomic[Range[50], 3]] (* Paolo Xausa, Feb 26 2024 *)