A174311 Value of the n-th cyclotomic polynomial at the discriminant of that polynomial.

0, 2, 7, 17, 246109501, 13, 22537999301860113141522943, 4294967297, 58149737003032434092905183, 242203001, 5313022609595033985218523349395070147785700752531778166637386100465086995951866123901089470951

Offset: 1

Author

Artur Jasinski, Mar 15 2010

Keywords

• nonn

Examples

			C_4(x) = x^2 + 1 has discriminant -4 so a(4) = C_4(-4) = 17. - _Robert Israel_, Jul 19 2016
		

Links

• Robert Israel, Table of n, a(n) for n = 1..28

Crossrefs

Cf. A004124.

Cf. A174304, A174305, A174306, A174307, A174308, A174309, A174310.

Programs

Maple

seq(numtheory:-cyclotomic(n, discrim(numtheory:-cyclotomic(n,x),x)), n=1..20); # Robert Israel, Jul 19 2016

Mathematica

s = {}; Do[d = Discriminant[Cyclotomic[n, x], x]; AppendTo[s, Cyclotomic[n, d]], {n, 1, 20}]; s

Formula

a(n) = C_n(A004124(n)) where A004124(n) is the discriminant of C_n(x) and C_n is the n-th cyclotomic polynomial. - Robert Israel, Jul 19 2016

Extensions

Edited by Robert Israel, Jul 19 2016