|
| |
|
|
A070524
|
|
Value of n-th cyclotomic polynomial at EulerPhi[n].
|
|
1
| |
|
|
0, 2, 7, 5, 341, 3, 55987, 257, 46873, 205, 11111111111, 241, 9726655034461, 39991, 14709241, 16777217, 19676527011956855057, 46441, 41660902667961039785743, 16519105, 8177824843189, 9090909091, 357686347714896679177439424707
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| n=6: the 6th c.polynomial is 1-x+xx, Phi[6]=2, C[6,Phi(6)]=C[6,2]=1-2+4=3=a(6).
|
|
|
MATHEMATICA
| Table[Cyclotomic[w, EulerPhi[w]], {w, 1, 25}]
|
|
|
CROSSREFS
| Cf. A070518-A070523.
Sequence in context: A094360 A051757 A193746 * A021366 A135155 A175477
Adjacent sequences: A070521 A070522 A070523 * A070525 A070526 A070527
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), May 02 2002
|
| |
|
|