A070521 Value of prime(n)-th cyclotomic polynomial at n.

2, 7, 121, 5461, 12207031, 2612138803, 38771752331201, 20587884010836553, 1107867264956562636991, 11111111111111111111111111111, 19194342495775048050414684129181, 773238409074645649506921062192257266781, 391287702091575733090747617444785169589677401

Offset

1,1

Links

Table of n, a(n) for n=1..13.

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

Cf. A070518-A070520.

Sequence in context: A101429 A270749 A206151 * A292433 A338181 A337764

Adjacent sequences: A070518 A070519 A070520 * A070522 A070523 A070524

Keyword

nonn

Author

Labos Elemer, May 02 2002

Extensions

More terms from Michel Marcus, Aug 29 2019

Status

approved