|
%I #7 Aug 29 2019 05:23:32
%S 2,7,121,5461,12207031,2612138803,38771752331201,20587884010836553,
%T 1107867264956562636991,11111111111111111111111111111,
%U 19194342495775048050414684129181,773238409074645649506921062192257266781,391287702091575733090747617444785169589677401
%N Value of prime(n)-th cyclotomic polynomial at n.
%F a(n) = Cyclotomic[Prime[n], n]
%e 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).
%t Table[Cyclotomic[Prime[w], w], {w, 1, 25}]
%o (PARI) a(n) = polcyclo(prime(n), n); \\ _Michel Marcus_, Aug 29 2019
%Y Cf. A070518-A070520.
%K nonn
%O 1,1
%A _Labos Elemer_, May 02 2002
%E More terms from _Michel Marcus_, Aug 29 2019
|
