cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-4 of 4 results.

A055035 Degree of minimal polynomial of sin(Pi/n) over the rationals.

Original entry on oeis.org

1, 1, 2, 2, 4, 1, 6, 4, 6, 2, 10, 4, 12, 3, 8, 8, 16, 3, 18, 8, 12, 5, 22, 8, 20, 6, 18, 12, 28, 4, 30, 16, 20, 8, 24, 12, 36, 9, 24, 16, 40, 6, 42, 20, 24, 11, 46, 16, 42, 10, 32, 24, 52, 9, 40, 24, 36, 14, 58, 16, 60, 15, 36, 32, 48, 10, 66, 32, 44, 12, 70, 24, 72
Offset: 1

Views

Author

Shawn Cokus (Cokus(AT)math.washington.edu)

Keywords

Comments

Also degree of minimal polynomial of function F(n)=(gamma(1/n)*gamma((n-1)/n))/Pi over the rationals. Roots of minimal polynomials of F(n) belonging to algebraic extension of sin(n/Pi) and vice versa (e.g. gamma(1/11)*gamma(10/11)/Pi = 20*sin(Pi/11) - 112*sin(Pi/11)^3 + 256*sin(Pi/11)^5 - 256*sin(Pi/11)^7 + (1024*sin(Pi/11)^9)/11). - Artur Jasinski, Oct 17 2011
The algebraic numbers sin(Pi/(2*l)) are given in A228783 in the power basis of the number field Q(2*cos(Pi/(2*l))) if n is even and of Q(2*cos(Pi/l)) if l is odd. In A228785, sin(Pi/(2*l+1)) is given in the power basis of Q(2*cos(Pi/(2*(2*l+1)))) (only odd powers appear). The minimal polynomials for 2*sin(Pi/n), n>=1, are given in A228786. - Wolfdieter Lang, Oct 10 2013

Crossrefs

Cf. A000010, A228786 (row length), A093819.

Programs

  • Mathematica
    a[n_] := If[n==2, 1, EulerPhi[n]/{1, 1, 2, 1}[[Mod[n, 4]+1]]]; Table[a[n], {n, 80}]
    a[n_] := Exponent[ MinimalPolynomial[Sin[Pi/n]][x], x]; Array[a, 75] (* Robert G. Wilson v, Jul 28 2014 *)

Formula

a(1)=1, a(2)=1, a(n)=phi(n)/(1, 1, 2, 1 for n=0, 1, 2, 3 mod 4) for n>2, where phi is Euler's totient, A000010
a(n) = A093819(2*n), n >= 1.- Wolfdieter Lang, Oct 29 2019

A228785 Table of coefficients of the algebraic number s(2*l+1) = 2*sin(Pi/(2*l+1)) as a polynomial in odd powers of rho(2*(2*l+1)) = 2*cos(Pi/(2*(2*l+1))) (reduced version).

Original entry on oeis.org

1, -3, 1, 5, -5, 1, -4, 5, -1, 9, -30, 27, -9, 1, -11, 55, -77, 44, -11, 1, 4, -13, 7, -1, -15, 140, -378, 450, -275, 90, -15, 1, 17, -204, 714, -1122, 935, -442, 119, -17, 1, -4, 25, -26, 9, -1, 0, 21, -385, 2079, -5148, 7007, -5733, 2940, -952, 189, -21, 1, -8, 126, -539, 967, -870, 429, -118, 17, -1, 0
Offset: 1

Views

Author

Wolfdieter Lang, Oct 07 2013

Keywords

Comments

In the regular (2*l+1)-gon, l >= 1, inscribed in a circle of radius R the length ratio side/R is s(2*l+1) = 2*sin(Pi/(2*l+1)). This can be written as a polynomial in the length ratio (smallest diagonal)/side in the (2*(2*l+1))-gon given by rho(2*(2*l+1)) = 2*cos(Pi/(2*(2*l+1))). This leads, in a first step, to the signed triangle A111125. Because of the minimal polynomial of the algebraic number rho(2*(2*l+1)) of degree delta(2*(2*l+1)) = A055034(2*(2*l+1)), called C(2*(2*l+1),x) (with coefficients given in A187360), one can eliminate all powers rho(2*(2*l+1))^k with k >= delta(2*(2*l+1)) by using C(2*(2*l+1),rho(2*(2*l+1))) = 0. This leads to the present table expressing s(2*(l+1)) in terms of odd powers of rho(2*(2*l+1)) with maximal exponent delta(2*(2*l+1))-1.
This table gives the coefficients of s(2*l+1), related to the (2*l+1)-gon, in the power basis of the algebraic number field Q(rho(2*(2*l+1))) of degree delta(2*(2*l+1)), related to rho from the (2*(2*l+1))-gon, provided one inserts zeros for the even powers, starting each row with a zero and filling zeros at the end in order to obtain the row length delta(2*(2*l+1)). Note that some trailing zeros in the present table (e.g., row l = 10) have been given such that the row length for the s(2*l+1) coefficients in the power basis Q(rho(2*(2*l+1))) becomes just twice the one of this table.
Thanks go to Seppo Mustonen for telling me about his findings regarding the square of the sum of all length in the regular n-gon, which led me to consider this entry (even though for odd n this is not needed because only s(2*l+1)^2 = 4 - rho(2*l+1)^2 enters).

Examples

			The table a(l,m), with n = 2*l+1, begins:
n,   l \m  0    1     2     3    4     5    6    7   8   9 10
3,   1:    1
5,   2:   -3    1
7,   3:    5   -5     1
9,   4:   -4    5    -1
11,  5:    9  -30    27    -9    1
13,  6:  -11   55   -77    44  -11     1
15,  7:    4  -13     7    -1
17,  8:  -15  140  -378   450 -275    90  -15    1
19,  9:   17 -204   714 -1122  935  -442  119  -17   1
21, 10:   -4   25   -26     9   -1     0
23, 11:   21 -385  2079 -5148 7007 -5733 2940 -952 189 -21  1
25, 12:   -8  126  -539   967 -870   429 -118   17  -1   0
27, 13:    4  -41    70   -43   11    -1    0    0   0
...
n = 29 l =  14:  -27, 819, -7371, 30888, -72930, 107406, -104652, 69768, -32319, 10395, -2277, 324, -27, 1.
n = 5, l=2: s(5) = -3*rho(10) + rho(10)^3 = (tau - 1)*sqrt(2 + tau), approximately 1.175570504, where tau = (1 + sqrt(5))/2 (golden section).
n = 17, l = 8: s(17) = -15*x + 140*x^3 - 378*x^5 + 450*x^7 - 275*x^9 + 90*x^11 - 15*x^13 + 1*x^15, with x = rho(34) = 2*cos(Pi/34). s(17) is approximately 0.3674990356. With the length row l = 8 the degree of the algebraic number s(17) = 2*sin(Pi/17) is therefore 2*8 = 16. See A228787 for the decimal expansion of s(17) and A228788 for the one of rho(34).
		

Crossrefs

Cf. A055034, A187360, A228783 (even n case), A228786 (minimal polynomials).

Formula

a(l,m) = [x^(2*m+1)](s(2*l+1,x)(mod C(2*(2l+1),x))), with s(2*l+1,x) = sum((-1)^(l-1-s)* A111125(l1,s)*x^(2*s+1), s=0..l-1), l >= 1, m=0, ..., (delta(2*(2*l+1))/2 - 1), with delta(n) = A055034(n).
Rows 9,15,21,27 are coefficients of polynomials in reciprocal powers of u for rows n=2,4,6,8 generated by the o.g.f. (u-4)/(u-ux+x^2) of A267633. These polynomials in u occur in a moving average of the polynomials of A140882 interlaced with these polynomials. - Tom Copeland, Jan 16 2016

A228786 Table of coefficients of the minimal polynomials of 2*sin(Pi/n), n >= 1.

Original entry on oeis.org

0, 1, -2, 1, -3, 0, 1, -2, 0, 1, 5, 0, -5, 0, 1, -1, 1, -7, 0, 14, 0, -7, 0, 1, 2, 0, -4, 0, 1, -3, 0, 9, 0, -6, 0, 1, -1, 1, 1, -11, 0, 55, 0, -77, 0, 44, 0, -11, 0, 1, 1, 0, -4, 0, 1, 13, 0, -91, 0, 182, 0, -156, 0, 65, 0, -13, 0, 1, 1, -2, -1, 1, 1, 0, -8, 0, 14, 0, -7, 0, 1, 2, 0, -16, 0, 20, 0, -8, 0, 1, 17, 0, -204, 0, 714, 0, -1122, 0, 935, 0, -442, 0, 119, 0, -17, 0, 1, 1, -3, 0, 1
Offset: 1

Views

Author

Wolfdieter Lang, Oct 07 2013

Keywords

Comments

s(n) := 2*sin(Pi/n) is, for n >= 2, the length ratio side/R of the regular n-gon inscribed in a circle of radius R. This algebraic number s(n), n >= 1, has the degree gamma(n) := A055035(n), and the row length of this table is gamma(n) + 1.
s(n) has been given in the power basis of the relevant algebraic number field in A228783 for even n (bisected into n == 0 (mod 4) and n == 2 (mod 4)), and in A228785 for odd n.
For the computation of the minimal polynomials ps(n,x), using the coefficients of s(n) in the relevant number field, and the conjugates of the corresponding algebraic numbers rho (giving the length ratios (smallest diagonal)/side in the relevant regular polygons see a comment on A228781. Note that the product of the gamma(n) linear factors (x - conjugates) has to be computed modulo the minimal polynomial of the relevant rho(k) = 2*cos(Pi/k) (called C(k,x=rho(k)) in A187360).
Thanks go to Seppo Mustonen, who asked a question about the square of the sum of all lengths in the regular n-gon, which led to this computation of s(n) and its minimal polynomial.
It would be interesting to find out which length ratios in the regular n-gon give the other positive zeros of the minimal polynomial ps(n,x). See some examples below.
The zeros of the row polynomials ps(n,x) are 2*cos(2*Pi*k/c(2*n))) for gcd(k, c(2*n)) = 1, where c(n) = A178182(n), and k from {0, ..., floor(c(2*n)/2)}, for n >= 1. The number of these solutions is gamma(n) = A055035(n). See the formula section. This results from the zeros of the minimal polynomials of sin(2*Pi/n), with coefficients given in A181872/A181873. - Wolfdieter Lang, Oct 30 2019

Examples

			The table a(n, m) starts:
n\m   0  1    2 3   4 5     6 7   8 9   10 12  13 14  15 16 17
1:    0  1
2:   -2  1
3:   -3  0    1
4:   -2  0    1
5:    5  0   -5 0   1
6:   -1  1
7:   -7  0   14 0  -7 0     1
8:    2  0   -4 0   1
9:   -3  0    9 0  -6 0     1
10:  -1  1    1
11: -11  0   55 0 -77 0    44 0 -11 0    1
12:   1  0   -4 0   1
13:  13  0  -91 0 182 0  -156 0  65 0  -13 0   1
14:   1 -2   -1 1
15:   1  0   -8 0  14 0    -7 0   1
16:   2  0  -16 0  20 0    -8 0   1
17:  17  0 -204 0 714 0 -1122 0 935 0 -442  0 119  0 -17  0  1
18:   1 -3    0 1
...
n = 19: [-19, 0, 285, 0, -1254, 0, 2508, 0, -2717, 0, 1729, 0, -665, 0, 152, 0, -19, 0, 1],
n = 20: [1, 0, -12, 0, 19, 0, -8, 0, 1]
n = 5: ps(5,x) = 5 -5*x^2 +1*x^4, with the zeros s(5) = sqrt(3 - tau), sqrt(2 + tau) = tau*s(5) and their negative values, where tau =rho(5) is the golden section. tau*s(5) is the length ratio diagonal/radius in the pentagon.
n = 7: ps(7,x) = -7 + 14*x^2 -7*x^4 + 1*x^6, with the positive zeros s(7) (side/R) about 0.868, s(7)*rho(7) (smallest diagonal/R) about 1.564, and s(7)*(rho(7)^2-1) (longer diagonal/R) about 1.950 in the heptagon inscribed in a circle with radius R.
n = 8: ps(8,x) = 2 -4*x^2 + x^4, with the positive zeros s(8) = sqrt(2-sqrt(2)) and rho(8) = sqrt(2+sqrt(2)) (smallest diagonal/side).
n = 10: ps(10,x) = -1 + x + x^2 with the positive zero s(10) = tau - 1 (the negative solution is -tau).
		

Crossrefs

Formula

a(n, m) = [x^m](minimal polynomial ps(n, x) of 2*sin(Pi/n) over the rationals), n >= 1, m = 0, ..., gamma(n), with gamma(n) = A055035(n).
ps(n,x) = Product_{k=0..floor(c(2*n)/n) and gcd(k, c(2*n)) = 1} (x - 2*cos(2*Pi*k/c(2*n)), with c(2*n) = A178182(2*n), for n >= 1. There are gamma(n) = A055035(n) zeros. - Wolfdieter Lang, Oct 30 2019

A230072 Coefficients of an algebraic number sqLhat(2*l) in the power basis of the number field Q(2*cos(Pi/2*l)), related to the square of all length in a regular (2*l)-gon inscribed in a circle of radius of 1 length unit.

Original entry on oeis.org

1, 3, 2, 7, 4, -1, 0, 4, 2, -9, -4, 8, 4, -1, 0, 8, 4, 15, 8, -24, -12, 8, 4, -1, 0, 16, 8, -16, -8, 4, 2, 7, 4, -16, -8, 8, 4, -1, 0, 24, 12, -32, -16, 8, 4, 23, 12, -104, -52, 128, 64, -56, -28, 8, 4, -1, 0, 32, 16, -32, -16, 8, 4, -25, -12, 176, 88, -320, -160, 232, 116, -72, -36, 8, 4
Offset: 1

Views

Author

Wolfdieter Lang, Oct 09 2013

Keywords

Comments

The row length of this table is delta(2*l) = A055034(2*l), l >= 1.
sqLhat(2*l) is the square of the sum of the lengths ratios of all lines/R (also called chords/R) divided by (2*l)^2 in a regular (2*l)-gon, l >= 1, inscribed in a circle of radius R. One may put R = 1 length unit.
sqLhat(2*l) is an algebraic number of degree delta(2*l) = A055034(2*l) and lives in the algebraic number field Q(rho(2*l)), with rho(n):= 2*cos(Pi/n). The power basis of Q(rho(n)) is <1, rho(n), rho(n)^2, ..., rho(n)^(delta(n)-1)>. This table gives the coefficients of sqLhat(2*l) in that basis: sqLhat(2*l) := Sum_{m=0..delta(2*l)-1} a(l,m)*rho(2*l)^m, l >= 1. See also A187360, and the W. Lang link below.
The formula to begin with is sqLhat(2*l) = (s(n)*Sum_{k=0..l-1} S(k,rho(n)))^2 with n=2*l, s(n) = 2*sin(Pi/n) (length ratio of the side to the radius R) and the Chebyshev S-polynomials (for the coefficients see A049310). sqLhat(2*l) = S2(2*l) + 1 - 2*s(2*l)*Sum_{k=0..l-1} S(k,rho(2*l)), with the square of the sums of the distinct length ratios S2(2*l) with power basis coefficients given in A228780(2*l). The power basis coefficients of s(2*l) are for even l given in A228783. For odd l = 2*L+1 one has to replace rho(l) by rho(2*l)^2 - 2 in the result for s(4*L+2) from A228783, in order to work in Q(rho(2*l)). One always computes modulo C(2*l,rho(2*l)) (which is zero) with the minimal polynomial C(n,x) of degree delta(n) for rho(n) known from A187360.
Thanks go to Seppo Mustonen, who asked me to look into this matter. The author thanks him for giving the below given link to his work about the square of the sum of all lengths in an n-gon, called there L(n)^2. Here n is even (n=2*l) and sqLhat(2*l) = (L(n)^2)/n^2. The odd n case is obtained from A228780 as L(2*l+1)^2 = n^2*S2(2*l+1) (observing that all distinct line lengths come precisely n times in the regular n-gon if n is odd).

Examples

			The table a(l,m) (n = 2*l) starts (row length A055034(2*l)):
  l,   n\m  0   1    2   3    4    5    6    7    8   9 10  1
  1,   2:   1
  2,   4:   3   2
  3,   6:   7   4
  4,   8:  -1   0    4   2
  5,  10:  -9  -4    8   4
  6,  12:  -1   0    8   4
  7,  14:  15   8  -24 -12    8    4
  8,  16:  -1   0   16   8  -16   -8    4    2
  9,  18:   7   4  -16  -8    8    4
  10, 20:  -1   0   24  12  -32  -16    8    4
  11, 22:  23  12 -104 -52  128   64  -56  -28   8    4
  12, 24:  -1   0   32  16  -32  -16    8    4
  13, 26: -25 -12  176  88 -320 -160  232  116  -72 -36  8  4
  14, 28:  -1   0   48  24 -160  -80  168   84  -64 -32  8  4
  15, 30:  -1   0   16   8  -24  -12    8    4
  ...
l = 3, n=6: (hexagon) sqLhat(6) = 13 + 4*rho(6) - 2*rho(6)^2 = 7 + 4*sqrt(3), where rho(6) = sqrt(3) and s(6) = 1. C(6,x) = x^2 -3. sqLhat(6) is approximately 13.92820323, therefore Mustonen's L2^(10) is approximately 501.4153163.
l = 5, n=10: (decagon) sqLhat(10) = -9 - 4*rho(10) + 8*rho(10)^2 + 4*rho(10)^3 = 7 + 8*phi + 4*(-1 + (2+phi))*sqrt(2+phi) = 7 + 8*phi + 4*sqrt(7+11*phi), with the golden section phi = rho(5) = (1 + sqrt(5))/2. sqLhat(10) is approximately 39.86345818, therefore Mustonen's L2^(10) is about 3986.345818. Here rho(10) = sqrt(2+phi) and s(10) = phi - 1.
l=6, n = 12: (dodecagon) sqLhat(12) = -1 + 8*rho(12)^2 + 4*rho(12)^3 = 15 + 6*sqrt(6) + 10*sqrt(2) + 4*sqrt(2)*sqrt(6), approximately 57.69548054. rho(12) = sqrt(2+sqrt(3)) and s(12) = sqrt(2 - sqrt(3)). Therefore Mustonen's L2^(12) is approximately 8308.149198.
		

Crossrefs

Cf. A055034, A187360, A228780, A230073 (minimal polynomials).

Formula

a(l,m) = [rho(2*l)^m](sqLhat(2*l) (mod C(2*l,rho(2*l)))), l >= 1, m = 0, ..., delta(2*l)-1, with delta(2*l) = A055034(2*l) and the formula for sqLhat(2*l) is given in a comment above.
Showing 1-4 of 4 results.