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.

A054472 Number of ways to color faces of an icosahedron using at most n colors.

Original entry on oeis.org

0, 1, 17824, 58130055, 18325477888, 1589459765875, 60935989677984, 1329871177501573, 19215358684143616, 202627758536996445, 1666666669200004000, 11212499922098481787, 63895999889747261952, 316749396282749868607, 1394470923827552301472, 5542094550277768379625
Offset: 0

Views

Author

Vladeta Jovovic, May 20 2000

Keywords

Comments

More explicitly, a(n) is the number of colorings with at most n colors of the faces of a regular icosahedron, inequivalent under the action of the rotation group of the icosahedron. It is also the number of inequivalent colorings of the vertices of a regular dodecahedron using at most n colors. - José H. Nieto S., Jan 19 2012
From Robert A. Russell, Oct 19 2020: (Start)
Each chiral pair is counted as two when enumerating oriented arrangements. The Schläfli symbols for the regular icosahedron and regular dodecahedron are {3,5} and {5,3} respectively. They are mutually dual.
There are 60 elements in the rotation group of the regular dodecahedron/icosahedron. They divide into five conjugacy classes. The first formula is obtained by averaging the icosahedron face (dodecahedron vertex) cycle indices after replacing x_i^j with n^j according to the Pólya enumeration theorem.
Conjugacy Class Count Even Cycle Indices
Identity 1 x_1^20
Vertex rotation 20 x_1^2x_3^6
Edge rotation 15 x_2^10
Small face rotation 12 x_5^4
Large face rotation 12 x_5^4 (End)

Crossrefs

Cf. A252704 (unoriented), A337959 (chiral), A337960 (achiral), A282670 (edges), A000545 (dodecahedron faces, icosahedron vertices), A006008 (tetrahedron), A047780 (cube faces, octahedron vertices), A000543 (octahedron faces, cube vertices).

Programs

  • Maple
    A054472:=n->(n^20 + 15*n^10 + 20*n^8 + 24*n^4)/60; seq(A054472(n), n=0..15); # Wesley Ivan Hurt, Jan 28 2014
  • Mathematica
    Table[(n^20+15n^10+20n^8+24n^4)/60,{n,0,15}] (* Harvey P. Dale, Nov 04 2011 *)
    LinearRecurrence[{21,-210,1330,-5985,20349,-54264,116280,-203490,293930,-352716,352716,-293930,203490,-116280,54264,-20349,5985,-1330,210,-21,1},{0,1,17824,58130055,18325477888,1589459765875,60935989677984,1329871177501573,19215358684143616,202627758536996445,1666666669200004000,11212499922098481787,63895999889747261952,316749396282749868607,1394470923827552301472,5542094550277768379625,20148763660520129167360,67737190111299199134361,212470603607497593076128,626499557627304397693519,1747626666669235200064000},20] (* Harvey P. Dale, Aug 11 2021 *)

Formula

a(n) = (1/60)*(n^20+15*n^10+20*n^8+24*n^4).
G.f.: -x*(x +1)*(x^18 +17802*x^17 +57738159*x^16 +17050750284*x^15 +1199757591558*x^14 +30128721042672*x^13 +329847884196810*x^12 +1749288479932404*x^11 +4727182539811968*x^10 +6598854419308684*x^9 +4727182539811968*x^8 +1749288479932404*x^7 +329847884196810*x^6 +30128721042672*x^5 +1199757591558*x^4 +17050750284*x^3 +57738159*x^2 +17802*x +1) / (x -1)^21. - Colin Barker, Jul 13 2013
a(n) = 1*C(n,1) + 17822*C(n,2) + 58076586*C(n,3) + 18093064608*C(n,4) + 1498413498750*C(n,5) + 51672950917308*C(n,6) + 936058547290608*C(n,7) + 10194866756893728*C(n,8) + 72644237439379200*C(n,9) + 357895538663241600*C(n,10) + 1264592451488446080*C(n,11) + 3281293750348373760*C(n,12) + 6337930306906598400*C(n,13) + 9157388718839961600*C(n,14) + 9858321678965760000*C(n,15) + 7794071905639219200*C(n,16) + 4394429252269056000*C(n,17) + 1672620130621440000*C(n,18) + 385209484627968000*C(n,19) + 40548366802944000*C(n,20), where the coefficient of C(n,k) is the number of oriented colorings using exactly k colors. - Robert A. Russell, Dec 03 2014
a(n) = A252704(n) + A337959(n) = 2*A252704(n) - A337960(n) = 2*A337959(n) + A337960(n). - Robert A. Russell, Oct 19 2020

Extensions

More terms from James Sellers, May 23 2000
More terms from Colin Barker, Jul 12 2013

A337960 Number of achiral colorings of the 30 triangular faces of a regular icosahedron or the 30 vertices of a regular dodecahedron using n or fewer colors.

Original entry on oeis.org

1, 1048, 133875, 4211872, 61198135, 545203800, 3465030541, 17197766272, 70665499413, 250166670040, 785039389519, 2230057075104, 5826818931739, 14178299017624, 32446195329465, 70387069393408, 145689159233737
Offset: 1

Views

Author

Robert A. Russell, Oct 03 2020

Keywords

Comments

An achiral coloring is identical to its reflection. The Schläfli symbols for the regular icosahedron and regular dodecahedron are {3,5} and {5,3} respectively. They are mutually dual.
There are 60 elements in the automorphism group of the regular dodecahedron/icosahedron that are not in the rotation group. They divide into five conjugacy classes. The first formula is obtained by averaging the cycle indices after replacing x_i^j with n^j according to the Pólya enumeration theorem.
Conjugacy Class Count Odd Cycle Indices
Inversion 1 x_2^10
Edge rotation* 15 x_1^4x_2^8 Asterisk indicates that the
Vertex rotation* 20 x_2^1x_6^3 operation is followed by an
Small face rotation* 12 x_10^2 inversion.
Large face rotation* 12 x_10^2

Crossrefs

Cf. A054472 (oriented), A252704 (unoriented), A337959 (chiral).
Other elements: A337953 (edges), A337962 (dodecahedron faces, icosahedron vertices).
Other polyhedra: A006003 (tetrahedron), A337898 (cube faces, octahedron vertices), A337897 (octahedron faces, cube vertices).

Programs

  • Mathematica
    Table[(15n^12+n^10+20n^4+24n^2)/60,{n,30}]

Formula

a(n) = n^2 * (15*n^10 + n^8 + 20*n^2 + 24) / 60.
a(n) = 1*C(n,1) + 1046*C(n,2) + 130734*C(n,3) + 3682656*C(n,4) + 41467050*C(n,5) + 238531284*C(n,6) + 791012880*C(n,7) + 1603496160*C(n,8) + 2021060160*C(n,9) + 1546836480*C(n,10) + 658627200*C(n,11) + 119750400*C(n,12), where the coefficient of C(n,k) is the number of achiral colorings using exactly k colors.
a(n) = 2*A252704(n) - A054472(n) = A054472(n) - 2*A337959(n) = A252704(n) - A337959(n).

A337961 Number of chiral pairs of colorings of the 12 pentagonal faces of a regular dodecahedron or the 12 vertices of a regular icosahedron using n or fewer colors.

Original entry on oeis.org

0, 14, 3720, 132184, 1987720, 17935806, 114638048, 570597216, 2348263008, 8320953630, 26126986952, 74247445272, 194049316552, 472265688622, 1080900468480, 2345089916288, 4854316187136, 9638888023278, 18442173583176
Offset: 1

Views

Author

Robert A. Russell, Oct 03 2020

Keywords

Comments

Each member of a chiral pair is a reflection, but not a rotation, of the other. The Schläfli symbols for the regular icosahedron and regular dodecahedron are {3,5} and {5,3} respectively. They are mutually dual.

Crossrefs

Cf. A000545 (oriented), A252705 (unoriented), A337962 (achiral).
Other elements: A337959 (dodecahedron vertices, icosahedron faces), A337964 (edges).
Other polyhedra: A000332 (tetrahedron), A093566(n+1) (cube faces, octahedron vertices), A337896 (octahedron faces, cube vertices).

Programs

  • Mathematica
    Table[(n^12-15n^8+14n^6+44n^4-44n^2)/120,{n,30}]
    LinearRecurrence[{13,-78,286,-715,1287,-1716,1716,-1287,715,-286,78,-13,1},{0,14,3720,132184,1987720,17935806,114638048,570597216,2348263008,8320953630,26126986952,74247445272,194049316552},20] (* Harvey P. Dale, Nov 17 2024 *)

Formula

a(n) = (n-1) * n^2 * (n+1) * (n^8 + n^6 - 14*n^4 + 44) / 120.
a(n) = 14*C(n,2) + 3678*C(n,3) + 117388*C(n,4) + 1363860*C(n,5) + 7918056*C(n,6) + 26332992*C(n,7) + 53428032*C(n,8) + 67359600*C(n,9) + 51559200*C(n,10) + 21954240*C(n,11) + 3991680*C(n,12), where the coefficient of C(n,k) is the number of chiral pairs of colorings using exactly k colors.
a(n) = A000545(n) - A252705(n) = (A000545(n) - A337962(n)) / 2 = A252705(n) - A337962(n).

A337964 Number of chiral pairs of colorings of the 30 edges of a regular dodecahedron or icosahedron using n or fewer colors.

Original entry on oeis.org

0, 8939560, 1715748562809, 9607677585671872, 7761021378582359350, 1842282662572342834488, 187827835730804603558945, 10316166993798251995440640, 353259652291613627252061348
Offset: 1

Views

Author

Robert A. Russell, Oct 03 2020

Keywords

Comments

Each member of a chiral pair is a reflection, but not a rotation, of the other. The Schläfli symbols for the regular icosahedron and regular dodecahedron are {3,5} and {5,3} respectively. They are mutually dual.

Crossrefs

Cf. A282670 (oriented), A337963 (unoriented), A337953 (achiral).
Other elements: A337959 (dodecahedron vertices, icosahedron faces), A337961 (dodecahedron faces, icosahedron vertices).
Other polyhedra: A337899 (tetrahedron), A337406 (cube/octahedron).

Programs

  • Mathematica
    Table[(n^30-15n^17+15n^16-n^15+20n^10+24n^6-20n^5-24n^3)/120,{n,30}]

Formula

a(n) = (n^30 - 15*n^17 + 15*n^16 - n^15 + 20*n^10 + 24*n^6 - 20*n^5 - 24*n^3) / 120.
a(n) = 8939560*C(n,2) + 1715721744129*C(n,3) + 9600814645057996*C(n,4) + 7713000148050232480*C(n,5) + 1795860615149796593688*C(n,6) + 175094502333083946715914*C(n,7) + 8864694277747989482032560*C(n,8) + 267022176368352696363194640*C(n,9) + 5242809910438322709320514240*C(n,10) + 71533267863137818750780447680*C(n,11) + 710438037081549637823404041600*C(n,12) + 5315930749209804729425000380800*C(n,13) + 30757743469720886648597337369600*C(n,14) + 140355611183197552206530379513600*C(n,15) + 512749946932635113438921952768000*C(n,16) + 1516429386147442831718766368256000*C(n,17) + 3659586727743885232600161343488000*C(n,18) + 7243809192262705479647976345600000*C(n,19) + 11790166608014659213935198412800000*C(n,20) + 15777861864770715186138442260480000*C(n,21) + 17309780658863308912305163714560000*C(n,22) + 15473267984805657314364466790400000*C(n,23) + 11155559298200256484274739609600000*C(n,24) + 6385716995478673633837056000000000*C(n,25) + 2834140845518322325537731379200000*C(n,26) + 939989821959452064042418176000000*C(n,27) + 219202016094796777623060480000000*C(n,28) + 32051387227306419585220608000000*C(n,29) + 2210440498434925488635904000000*C(n,30), where the coefficient of C(n,k) is the number of chiral pairs of colorings using exactly k colors.
a(n) = A282670(n) - A337963(n) = (A282670(n) - A337953(n)) / 2 = A337963(n) - A337953(n).
Showing 1-4 of 4 results.