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.

A384284 Decimal expansion of the surface area of a gyroelongated pentagonal cupola with unit edge.

Original entry on oeis.org

2, 5, 2, 4, 0, 0, 0, 3, 7, 9, 0, 8, 3, 2, 5, 8, 3, 5, 1, 3, 7, 3, 1, 2, 7, 8, 0, 5, 1, 8, 9, 2, 5, 8, 6, 4, 5, 2, 8, 1, 6, 6, 6, 2, 3, 6, 5, 1, 6, 9, 5, 5, 8, 3, 2, 2, 1, 5, 3, 7, 7, 8, 9, 5, 4, 5, 3, 5, 6, 0, 8, 5, 6, 9, 1, 2, 6, 6, 9, 3, 7, 5, 9, 2, 2, 6, 0, 8, 9, 2
Offset: 2

Views

Author

Paolo Xausa, May 27 2025

Keywords

Comments

The gyroelongated pentagonal cupola is Johnson solid J_24.

Examples

			25.240003790832583513731278051892586452816662365...
		

Crossrefs

Programs

  • Mathematica
    First[RealDigits[(20 + 25*Sqrt[3] + Sqrt[725 + 310*Sqrt[5]])/4, 10, 100]]
    First[RealDigits[PolyhedronData["J24", "SurfaceArea"], 10, 100]]
  • PARI
    (20 + 25*sqrt(3) + sqrt(725 + 310*sqrt(5)))/4 \\ Charles R Greathouse IV, Aug 19 2025

Formula

Equals (20 + 25*sqrt(3) + sqrt(725 + 310*sqrt(5)))/4 = (20 + 25*A002194 + sqrt(725 + 310*A002163))/4.
Equals the largest root of 256*x^8 - 10240*x^7 + 12800*x^6 + 3200000*x^5 - 22476000*x^4 - 203280000*x^3 + 1412362500*x^2 + 3080375000*x - 17984046875.

A384140 Decimal expansion of the volume of an elongated pentagonal bipyramid with unit edge.

Original entry on oeis.org

2, 3, 2, 3, 4, 8, 3, 0, 6, 5, 3, 8, 0, 6, 1, 6, 0, 6, 4, 1, 2, 6, 4, 4, 3, 1, 1, 6, 4, 4, 9, 5, 4, 9, 2, 8, 5, 6, 9, 4, 0, 9, 2, 3, 6, 6, 6, 4, 4, 4, 9, 2, 1, 3, 9, 5, 6, 3, 0, 0, 2, 8, 1, 0, 8, 0, 8, 0, 7, 9, 0, 6, 9, 3, 4, 5, 4, 4, 9, 9, 7, 2, 9, 5, 0, 3, 0, 9, 1, 0
Offset: 1

Views

Author

Paolo Xausa, May 20 2025

Keywords

Comments

The elongated pentagonal bipyramid is Johnson solid J_16.

Examples

			2.32348306538061606412644311644954928569409236664...
		

Crossrefs

Cf. A384141 (surface area).

Programs

  • Mathematica
    First[RealDigits[(5 + Sqrt[5] + 3*Sqrt[25 + 10*Sqrt[5]])/12, 10, 100]] (* or *)
    First[RealDigits[PolyhedronData["J16", "Volume"], 10, 100]]

Formula

Equals (5 + sqrt(5) + 3*sqrt(25 + 10*sqrt(5)))/12 = (5 + A002163 + 3*sqrt(25 + 10*A002163))/12.
Equals the largest root of 20736*x^4 - 34560*x^3 - 44640*x^2 + 27600*x + 6025.

A384286 Decimal expansion of the surface area of a gyroelongated pentagonal rotunda with unit edge.

Original entry on oeis.org

3, 1, 0, 0, 7, 4, 5, 4, 3, 0, 3, 2, 3, 8, 5, 1, 4, 7, 4, 4, 4, 3, 5, 6, 4, 5, 8, 6, 5, 7, 1, 7, 9, 7, 4, 9, 0, 8, 5, 3, 2, 0, 3, 9, 7, 8, 2, 4, 8, 3, 5, 2, 5, 7, 5, 3, 2, 5, 9, 0, 1, 1, 2, 1, 3, 9, 6, 9, 8, 6, 9, 8, 0, 1, 3, 0, 7, 5, 2, 4, 9, 6, 2, 2, 3, 9, 7, 2, 8, 1
Offset: 2

Views

Author

Paolo Xausa, May 30 2025

Keywords

Comments

The gyroelongated pentagonal rotunda is Johnson solid J_25.

Examples

			31.00745430323851474443564586571797490853203978248...
		

Crossrefs

Programs

  • Mathematica
    First[RealDigits[(15*Sqrt[3] + Sqrt[650 + 290*Sqrt[5]])/2, 10, 100]] (* or *)
    First[RealDigits[PolyhedronData["J25", "SurfaceArea"], 10, 100]]

Formula

Equals (15*sqrt(3) + sqrt(650 + 290*sqrt(5)))/2 = (15*A002194 + sqrt(650 + 290*A002163))/2.
Equals the largest root of 256*x^8 - 339200*x^6 + 98924000*x^4 - 9264250000*x^2 + 176295015625.

A385505 Decimal expansion of the volume of a biaugmented triangular prism with unit edge.

Original entry on oeis.org

9, 0, 4, 4, 1, 7, 2, 2, 2, 6, 8, 3, 2, 5, 1, 0, 0, 6, 3, 1, 5, 7, 5, 7, 8, 2, 6, 7, 7, 9, 7, 0, 0, 7, 8, 4, 5, 9, 2, 2, 5, 8, 6, 0, 5, 2, 4, 4, 9, 1, 1, 1, 8, 1, 4, 0, 6, 1, 7, 8, 3, 2, 4, 1, 9, 3, 2, 2, 7, 4, 1, 3, 7, 1, 4, 5, 6, 9, 0, 2, 2, 2, 2, 0, 4, 1, 5, 7, 2, 4
Offset: 0

Views

Author

Paolo Xausa, Jul 01 2025

Keywords

Comments

The biaugmented triangular prism is Johnson solid J_50.

Examples

			0.90441722268325100631575782677970078459225860524491...
		

Crossrefs

Cf. A384141 (surface area + 4).

Programs

  • Mathematica
    First[RealDigits[Sqrt[59/144 + 1/Sqrt[6]], 10, 100]] (* or *)
    First[RealDigits[PolyhedronData["J50", "Volume"], 10, 100]]

Formula

Equals sqrt(59/144 + 1/sqrt(6)) = sqrt(59/144 + A020763).
Equals the largest root of 20736*x^4 - 16992*x^2 + 25.

A384143 Decimal expansion of the volume of an elongated triangular cupola with unit edge.

Original entry on oeis.org

3, 7, 7, 6, 5, 8, 7, 5, 1, 3, 3, 3, 0, 8, 9, 5, 1, 4, 7, 6, 2, 5, 9, 1, 0, 1, 1, 5, 7, 6, 6, 8, 9, 0, 2, 8, 2, 5, 5, 5, 6, 0, 1, 1, 1, 0, 1, 9, 6, 3, 6, 1, 0, 0, 3, 0, 6, 4, 2, 7, 6, 9, 1, 7, 5, 0, 3, 5, 0, 9, 9, 2, 4, 0, 8, 1, 6, 2, 2, 5, 8, 7, 9, 9, 7, 0, 4, 2, 2, 2
Offset: 1

Views

Author

Paolo Xausa, May 22 2025

Keywords

Comments

The elongated triangular cupola is Johnson solid J_18.

Examples

			3.776587513330895147625910115766890282555601110196...
		

Crossrefs

Cf. A384141 (surface area - 4).

Programs

  • Mathematica
    First[RealDigits[(5*Sqrt[2] + 9*Sqrt[3])/6, 10, 100]] (* or *)
    First[RealDigits[PolyhedronData["J18", "Volume"], 10, 100]]

Formula

Equals (5*sqrt(2) + 9*sqrt(3))/6 = (5*A002193 + 9*A002194)/6.
Equals the largest root of 1296*x^4 - 21096*x^2 + 37249.
Showing 1-5 of 5 results.