This site is supported by donations to The OEIS Foundation.



Please make a donation to keep the OEIS running. We are now in our 55th year. In the past year we added 12000 new sequences and reached 8000 citations (which often say "discovered thanks to the OEIS"). We need to raise money to hire someone to manage submissions, which would reduce the load on our editors and speed up editing.
Other ways to donate

(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A193678 Discriminant of Chebyshev C-polynomials. 10
1, 8, 108, 2048, 50000, 1492992, 52706752, 2147483648, 99179645184, 5120000000000, 292159150705664, 18260173718028288, 1240576436601868288, 91029559914971267072, 7174453500000000000000, 604462909807314587353088, 54214017802982966177103872 (list; graph; refs; listen; history; text; internal format)



The array of coefficients of the (monic) Chebyshev C-polynomials is found under A127672 (where they are called, in analogy to the S-polynomials, R-polynomials).

See A127670 for the formula in terms of the square of a Vandermonde determinant, where now the zeros are xn[j]:=2*cos(Pi*(2*j+1)/n), j=0,..,n-1.

One could add a(0)=0 for the discriminant of C(0,x)=2.

Except for sign, a(n) is the field discriminant of 2^(1/n); see the Mathematica program. - Clark Kimberling, Aug 03 2015


Theodore J. Rivlin, Chebyshev polynomials: from approximation theory to algebra and number theory, 2. ed., Wiley, New York, 1990; p. 219 for T and U polynomials.


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


a(n) = (Det(Vn(xn[1],..,xn[n]))^2, with the n x n Vandermonde matrix Vn and the zeros xn[j],j=0..n-1, given above in a comment.

a(n)= (2^(n-1))*n^n, n>=1.

a(n) = A000079(n-1)*A000312(n). - Omar E. Pol, Aug 27 2011


n=3: The zeros are [sqrt(3),0,-sqrt(3)]. The Vn(xn[1],..,xn[n]) matrix is [[1,1,1],[sqrt(3),0,-sqrt(3)],[3,0,3]]. The squared determinant is 108 = a(3).


seq(discrim(2*orthopoly[T](n, x/2), x), n = 1..50); # Robert Israel, Aug 04 2015


t=Table[NumberFieldDiscriminant[2^(1/m)], {m, 1, 20}] (* signed version *)

Abs[t] (* Clark Kimberling, Aug 03 2015 *)

Table[(2^(n - 1)) n^n, {n, 20}] (* Vincenzo Librandi, Aug 04 2015 *)


(MAGMA) [(2^(n-1))*n^n: n in [1..20]]; // Vincenzo Librandi, Aug 04 2015


Cf. A127670.

Sequence in context: A215129 A234571 A120975 * A265277 A184267 A099699

Adjacent sequences:  A193675 A193676 A193677 * A193679 A193680 A193681




Wolfdieter Lang, Aug 07 2011



Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified December 7 08:18 EST 2019. Contains 329841 sequences. (Running on oeis4.)