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-5 of 5 results.

A213939 Partition array for the number of representative bracelets (dihedral symmetry D_n) with n beads, each available in n colors. Only the color type (signature) matters.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 3, 1, 1, 2, 2, 4, 6, 12, 1, 1, 3, 3, 3, 6, 11, 10, 16, 30, 60, 1, 1, 3, 4, 3, 9, 10, 18, 15, 30, 48, 60, 90, 180, 360, 1, 1, 4, 5, 8, 4, 12, 19, 33, 38, 21, 54, 70, 108, 171, 105, 210, 318, 420, 630, 1260, 2520, 1, 1, 4, 7, 10, 4, 16, 28, 38, 48, 76, 94
Offset: 1

Views

Author

Wolfdieter Lang, Jul 20 2012

Keywords

Comments

The row lengths sequence is A000041(n), n >= 1.
The partitions are ordered like in Abramowitz-Stegun (A-St order). For the reference see A036036, where also a link to a work by C. F. Hindenburg from 1779 is found where this order has been used.
A bracelet with n beads (n-bracelet) has the dihedral D_n symmetry group of degree n (order 2n). In addition to cyclic C_n operations, also a turnover (in 3-space) or a reflection (in 2-space) is allowed. In the Harary-Palmer reference, p. 44, the term necklace is used instead of bracelet.
a(n,k) gives the number of representative n-bracelets, with up to n colors for each bead, belonging to the k-th partition of n in A-St order in the following way. Write this partition with nonincreasing parts (this is the reverse of the partition as given by A-St), e.g., [3,1^2], not [1^2,3], which is written as [3,1,1], a partition of n=5. In general a (reversed) partition of n is written as [p[1],p[2],...,p[m]], with p[1] >= p[2] >= ... >= p[m] >= 1, with m the number of parts. To each such partition of n corresponds an n-multiset obtained by 'exponentiation'. For more details see the W. Lang link in A213938 with more details as well as a list of multiset signatures and corresponding multiset representatives. For the given example the 5-multiset is {1^3,2^1,3^1}={1,1,1,2,3}. In general, {1^p[1],2^p[2],...,m^p[m]}. We will also use a list notation with square brackets for these multisets. Such an n-multiset representative (of a repetition class defined by the exponents, also called signature) encodes the representative n-bracelet color monomial by c[1]^p[1]*c[2]^p[2]*...*c[m]^p[m]. For the example one has c[1]^3*c[2]*c[3]. The number of 5-bracelets with this color assignment is a(5,4) because [3,1,1] is the 4th partition of 5 in A-St order. The a(5,4)=2 non-equivalent 5-bracelets with this color assignment are cyclic(c[1]c[1]c[1]c[2]c[3]) and cyclic(c[1]c[1]c[2]c[1]c[3]). For the necklace case c[1]c[1]c[1]c[3]c[2] and c[1]c[1]c[3]c[1]c[2] (both taken cyclically) also have to be counted, but due to a turn over (or a reflection) they become equivalent to the two given bracelets, respectively.
Such a set of a(n,k) n-bracelets for the given color signature stands for other sets of the same order when different colors from the repertoire {c[1],...,c[n]} are chosen. In the example, the partition [3,1,1] with the representative multiset [1^3,2,3] stands for all-together 5*binomial(4,2) = 30 such sets, each leading to 2 possible non-equivalent 5-bracelet arrangements. Thus one has all-together 30*2=60 5-bracelets with color signature determined from the partition [3,1,1]. See the partition array A213941 for these total bracelet numbers.
a(n,k) is computed from the cycle index Z(D_n) for the dihedral group (see A212355 and the link given there) after the variables x_j have been replaced by the j-th power sum sum(c[i]^j,i=1..n), abbreviated as Z(D_n,c_n) with c_n:=sum(c[i],i=1..n), n >= 1. The coefficient of the representative color multinomial determined by the k-th partition of n in A-St order, as explained above, is a(n,k). See the Harary-Palmer reference, p. 36, Theorem (PET) with A = D_n and p. 37 eq. (2.2.11) for the cycle index polynomial Z(D_n). See the W. Lang link for more details.
The row sums are given by A213943.

Examples

			n\k 1 2 3 4 5 6  7  8  9 10 11 12 13  14  15 ...
1   1
2   1 1
3   1 1 1
4   1 1 2 2 3
5   1 1 2 2 4 6 12
6   1 1 3 3 3 6 11 10 16 30 60
7   1 1 3 4 3 9 10 18 15 30 48 60 90 180 360
...
Row n = 8 is 1 1 4 5 8 4 12 19 33 38 21 54 70 108 171 105 210 318 420 630 1260 2520.
See the link for the rows n=1 to n=15, and the corresponding color polynomials for n=1 to n=10.
a(4,5) = 3 because the partition in question is [1^4]=[1,1,1,1], the corresponding representative color multinomial is c[1]*c[2]*c[3]*c[4] (all four colors are involved), and there are the 3 D_4 non-equivalent 4-bracelets (we use here j for color c[j]): 1234, 1324 and 1423 (all taken as cyclically). For this partition there is only one color choice. The necklace solutions 1243, 1342, 1432, taken cyclically, become equivalent to the given bracelets, respectively (for necklaces see A212359).
a(4,4) = 2 because the partition is [2,1^2]=[2,1,1], the color representative multinomial is c[1]^2*c[2]*c[3], and the bracelet arrangements are 1123 and 1213 (all taken cyclically). The necklace cyclic(1132) becomes equivalent to the first bracelet under reflection. In total, there are 4*binomial(3,2)=12 color multinomials of this signature (color type) in Z(D_4,c_4), each with a coefficient 2.
		

References

  • F. Harary and E. M. Palmer, Graphical Enumeration, Academic Press, NY, 1973

Crossrefs

Cf. A212355 (Z(D_n)), A213943(row sums), A213940 (triangle with entries for fixed m summed).

Formula

a(n,k) is the number of representative bracelet arrangements with n beads (respecting the dihedral D_n symmetry) with color assignment given by the multiset representative obtained uniquely from the k-th partition of n in A-St order. See the comment for more details and the A-St reference.

A005648 Number of 2n-bead black-white reversible necklaces with n black beads.

Original entry on oeis.org

1, 1, 2, 3, 8, 16, 50, 133, 440, 1387, 4752, 16159, 56822, 200474, 718146, 2587018, 9398520, 34324174, 126068558, 465093571, 1723176308, 6407924300, 23910576230, 89494164973, 335913918902, 1264107416466
Offset: 0

Views

Author

Keywords

Comments

a(n) is the coefficient of c_1^n*c_2^n in the cycle index polynomial for the dihedral group D_{2*n} evaluated with the figure counting polynomial c = c_1 + c_2, n>=1, abbreviated as Z(D_{2*n},c). See, e.g., the Harary-Palmer reference (given under A212355), p. 42, Theorem (PET), and the example for all 6 two-colored 4-bracelets (called there necklaces) on p. 44, Figure 2.4.2. - Wolfdieter Lang, Jun 05 2012

Examples

			a(2) = 2: BBWW, BWBW.
a(3) = 3: BBBWWW, BBWBWW, BWBWBW.
a(4) = 8: BBBBWWWW, BBBWBWWW, BBBWWBWW, BBWWBBWW, BBWBWBWW, BBWBWWBW, BBWBBWWW, BWBWBWBW.
		

References

  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Crossrefs

Programs

  • Mathematica
    f[k_Integer, n_] := (Plus @@ (EulerPhi[ # ]Binomial[n/#, k/# ] & /@ Divisors[GCD[n, k]])/n + Binomial[(n - If[OddQ@n, 1, If[OddQ@k, 2, 0]])/2, (k - If[OddQ@k, 1, 0])/2])/2 (* Robert A. Russell, Sep 27 2004 *)
    Table[ f[n, 2n], {n, 27}] (* Robert G. Wilson v, Mar 29 2006 *)
    a[0] = 1; a[n_] := 1/2*(Binomial[2*Quotient[n, 2], Quotient[n, 2]] + DivisorSum[n, EulerPhi[#]*Binomial[2*n/#, n/#]&]/(2*n)); Array[a, 26, 0] (* Jean-François Alcover, Nov 05 2017, translated from PARI *)
  • PARI
    a(n) = 1/2*( binomial(2*(n\2), n\2) + if(n<1, n >= 0, sumdiv(n, k, eulerphi(k)*binomial(2*n/k, n/k))/(2*n) ));

Formula

a(n) = ( Sum_{d|n} phi(n/d)*C(2*d, d) )/(4*n) + C(2*k, k)/2, where k = floor(n/2). - Michael Somos
a(n) = (A003239(n) + C(2*k, k))/2, where k = [ n/2 ]. - R. J. Fletcher, (yylee(AT)mail.ncku.edu.tw)

Extensions

Sequence extended and description corrected by Christian G. Bower
Example n=8 (word no. 6) corrected by Wolfdieter Lang, Jun 05 2012

A056711 Plug g.f. for A000108 (minus the leading 1), 1/2*(1-(1-4*x)^(1/2))/x - 1, into cycle index for dihedral group D_3.

Original entry on oeis.org

0, 0, 0, 1, 2, 8, 28, 100, 358, 1309, 4772, 17556, 64782, 240090, 892662, 3329942, 12456782, 46725350, 175698056, 662193908, 2501118956, 9465771967, 35891640172, 136331485336, 518702002350, 1976588406300, 7543137149256, 28826327724850, 110304963059048
Offset: 0

Views

Author

N. J. A. Sloane, Jan 19 2001

Keywords

Crossrefs

Column k=3 of A275431.

Formula

Cycle index for D_3: 1/6*Z[1]^3+1/2*Z[1]*Z[2]+1/3*Z[3].
O.g.f.: 1/6*A(x)^3 + 1/2*A(x)*A(x^2) + 1/3*A(x^3), with A(x):=1/2*(1-(1-4*x)^(1/2))/x - 1 (see the name). For the cycle index of the dihedral group D_n see A212355 for the Harary-Palmer reference, the formula and a link. - Wolfdieter Lang, Jun 02 2012

A212356 Number of terms of the cycle index polynomial Z(D_n) for the dihedral group D_n.

Original entry on oeis.org

1, 2, 3, 4, 3, 5, 3, 5, 4, 5, 3, 7, 3, 5, 5, 6, 3, 7, 3, 7, 5, 5, 3, 9, 4, 5, 5, 7, 3, 9, 3, 7, 5, 5, 5, 10, 3, 5, 5, 9, 3, 9, 3, 7, 7, 5, 3, 11, 4, 7, 5, 7, 3, 9, 5, 9, 5, 5, 3, 13, 3, 5, 7, 8, 5, 9, 3, 7, 5, 9, 3, 13, 3, 5, 7, 7, 5, 9, 3, 11, 6, 5, 3, 13, 5, 5, 5, 9, 3, 13
Offset: 1

Views

Author

Wolfdieter Lang, Jun 02 2012

Keywords

Comments

See A212355 for the formula for the cycle index Z(D_n) of the dihedral group, the Harary and Palmer reference, and a link for these polynomials for n=1..15.
It seems that this is also the number of different sets of distances of n points placed on 2n equidistant points on a circle. - M. F. Hasler, Jan 28 2013

Examples

			a(6) = 5, because tau(6) = 4. The row no. 6 of A212355 is [2,0,0,2,0,0,4,0,3,0,1] with 5 non-vanishing entries.
Illustration of a(7)=3 = number of different sets of distances of 7 points among {z=e^(i k pi/7), k=0..13}: Inequivalent configurations are, e.g.: [k]=[0,2,4,6,8,10,12] with distances {0.86777, 1.5637, 1.9499}, [k]=[0,1,2,3,4,5,6] with distances {0.44504, 0.86777, 1.2470, 1.5637, 1.8019, 1.9499}, and [k]=[0,1,2,3,4,5,7] with distances {0.44504, 0.86777, 1.2470, 1.5637, 1.8019, 1.9499, 2.0000}. - _M. F. Hasler_, Jan 28 2013
		

Crossrefs

Programs

Formula

a(n) is the number of non-vanishing entries in row n of the array A212355.
a(1) = 1, a(2) = 2, and a(n) = tau(n) + 1, n>=3, with tau(n) the number of all divisors of n, given in A000005(n).
Except for a(1) and a(2), a(n) = A161886(n+1) - A161886(n). - Eric Desbiaux, Sep 25 2013

A212358 Coefficients of the cycle index polynomial for the alternating group A_n multiplied by n!/2, n>=1, read as partition polynomial.

Original entry on oeis.org

1, 0, 1, 2, 0, 1, 0, 8, 3, 0, 1, 24, 0, 0, 20, 15, 0, 1, 0, 144, 90, 40, 0, 0, 0, 40, 45, 0, 1, 720, 0, 0, 0, 504, 630, 280, 210, 0, 0, 0, 70, 105, 0, 1, 0, 5760, 3360, 2688, 1260, 0, 0, 0, 0, 0, 1344, 2520, 1120, 1680, 105, 0, 0, 0, 112, 210, 0, 1
Offset: 1

Views

Author

Wolfdieter Lang, Jun 12 2012

Keywords

Comments

The row lengths sequence is A000041.
The partitions are ordered like in Abramowitz-Stegun (for the reference see A036036, where also a link to a work by C. F. Hindenburg from 1779 is found where this order has been used).
The row sums are A001710(n-1), n>=1.
The cycle index (multivariate polynomial) for the alternating group A_n, called Z(A_n), is
Z(S_n) + Z(S_n;x[1],-x[2],x[3],-x[4],... ), n>=1,
with the cycle index Z(S_n) for the symmetric group S_n, in the variables x[1],...,x[n]. See the Harary and Palmer reference. The coefficients of n!*Z(S_n) are the M_2 numbers of Abramowitz-Stegun, pp. 831-2. See A036039 and A102189, also for the Abramowitz-Stegun reference.

Examples

			Triangle begins:
  n\k  1    2   3   4   5  6  7   8   9 10 11 ...
  1:   1
  2:   0    1
  3:   2    0   1
  4:   0    8   3   0   1
  5:  24    0   0  20  15  0  1
  6:   0  144  90  40   0  0  0  40  45  0  1
  ...
See the link for rows n=1..10 and the Z(A_n) polynomials for n=1..13.
n=6: Z(A_6) = 2*(144*x[1]*x[5] + 90*x[2]*x[4] + 40*x[3]^2 + 40*x[1]^3*x[3] + 45*x[1]^2*x[2]^2 + 1*x[1]^6)/6!, because the relevant partitions of 6 appear for k=2: 1,5;  k=3: 2,4; k=4: 3^2; k=8: 1^3,3; k=9: 1^2,2^2  and k=11: 1^6. Thus, Z(A_6) = (2/5)*x[1]*x[5] + (1/4)*x[2]*x[4] +  (1/9)*x[3]^2  + (1/9)*x[1]^3*x[3] + (1/8)*x[1]^2*x[2]^2 + (1/360)*x[1]^6.
		

References

  • F. Harary and E. M. Palmer, Graphical Enumeration, Academic Press, NY, 1973, p. 36, (2.2.6).

Crossrefs

Cf. A036039 or A102189 for Z(S_n), A212355 for Z(D_n), and A212357 for Z(C_n).

Formula

The cycle index polynomial for the alternating group A_n is Z(A_n) = (2*a(n,k)*x[1]^(e[k,1])*x[2]^(e[k,2])*...*x[n]^(e[k,n]))/n!, n>=1, if the k-th partition of n in Abramowitz-Stegun order is 1^(e[k,1]) 2^(e[k,2]) ... n^(e[k,n]), where a part j with vanishing exponent e[k,j] has to be omitted. The n dependence of the exponents has been suppressed. See the comment above for the Z(A_n) formula, and the link for these polynomials for n=1..13.
a(n,k) is the coefficient the term of (n!/2)*Z(A_n) corresponding to the k-th partition of n in Abramowitz-Stegun order. a(n,k) = 0 if there is no such term in Z(A_n).
Showing 1-5 of 5 results.