[go: up one dir, main page]

login
A070521
Value of prime(n)-th cyclotomic polynomial at n.
3
2, 7, 121, 5461, 12207031, 2612138803, 38771752331201, 20587884010836553, 1107867264956562636991, 11111111111111111111111111111, 19194342495775048050414684129181, 773238409074645649506921062192257266781, 391287702091575733090747617444785169589677401
OFFSET
1,1
FORMULA
a(n) = Cyclotomic[Prime[n], n]
EXAMPLE
n=3: Cyclotomic[prime(3),x]=C[5,3]=[1+x+xx+xxx+xxxx,at x=3]; it is 1+3+9+27+81=121=a(3).
MATHEMATICA
Table[Cyclotomic[Prime[w], w], {w, 1, 25}]
PROG
(PARI) a(n) = polcyclo(prime(n), n); \\ Michel Marcus, Aug 29 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, May 02 2002
EXTENSIONS
More terms from Michel Marcus, Aug 29 2019
STATUS
approved