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.

A186705 The Erdős unit distance problem: the maximum number of occurrences of the same distance among n points in the plane.

Original entry on oeis.org

0, 1, 3, 5, 7, 9, 12, 14, 18, 20, 23, 27, 30, 33, 37, 41, 43, 46, 50, 54, 57
Offset: 1

Views

Author

Michael Somos, Feb 25 2011

Keywords

Comments

An upper bound is floor(k*n^(4/3)), A129011, if k is close enough to 1. Also a(27)=81 (Hamming 3,3 graph). - Ed Pegg Jr, Feb 02 2018

Examples

			a(4) = 5 because there is a unit distance graph with 4 vertices of an equilateral rhombus such that all but one of the six pairs of vertices are unit distance apart.
Comment from _Allan C. Wechsler_, Sep 17 2018: (Start)
Construction for a(9)=18: Take a convex, equilateral hexagon ABCDEF. Make the angles vary a bit, though, to avoid the hexagon being regular. Now, on each of the six sides, construct an equilateral triangle pointing into the hexagon. In general, the triangles will overlap here and there; this is OK because we aren't going to care about edges crossing each other. So we have triangles ABU, BCV, CDW, DEX, EFY, and FAZ: a total of twelve points with 18 unit distances among them.
Now adjust the hexagon to make some pairs of the internal points coincide. We want to make U=X, V=Y, and W=Z. The resulting linkage still has one degree of freedom, so we can arrange it so that none of the edges coincide (they can and must cross, though). The adjusted hexagon will only have two different angles: ABC = CDE = EFA, and BCD = DEF = FAB. The whole thing will have triangular (D_6) symmetry. It will have nine vertices (after merging three pairs from the original 12) but it will still have 18 unit edges. (End)
		

References

  • P. Brass, W. O. J. Moser, J. Pach, Research Problems in Discrete Geometry, Springer (2005), p. 183

Crossrefs

Cf. A385657 (number of nonisomorphic maximally dense unit-distance graphs).

Extensions

Extended to a(21) using values from Version 2 of the Alexeev et al. arXiv manuscript. - N. J. A. Sloane, Jun 24 2025

A134917 a(n) = ceiling(n^(4/3)).

Original entry on oeis.org

1, 3, 5, 7, 9, 11, 14, 16, 19, 22, 25, 28, 31, 34, 37, 41, 44, 48, 51, 55, 58, 62, 66, 70, 74, 78, 81, 86, 90, 94, 98, 102, 106, 111, 115, 119, 124, 128, 133, 137, 142, 146, 151, 156, 161, 165, 170, 175, 180, 185, 190, 195, 200
Offset: 1

Views

Author

Mohammad K. Azarian, Nov 17 2007

Keywords

Crossrefs

Programs

A134918 Ceiling(n^(5/3)).

Original entry on oeis.org

1, 4, 7, 11, 15, 20, 26, 32, 39, 47, 55, 63, 72, 82, 92, 102, 113, 124, 136, 148, 160, 173, 187, 200, 214, 229, 243, 259, 274, 290, 306, 323, 340, 357, 375, 393, 411, 430, 449, 468, 488, 508, 528, 549, 570, 591, 613, 634, 657
Offset: 1

Views

Author

Mohammad K. Azarian, Nov 17 2007

Keywords

Crossrefs

Programs

A380891 If n mod 2 = 0 then a(n) = floor(n^(1/3)) else a(n) = floor(n^(4/3)).

Original entry on oeis.org

0, 1, 1, 4, 1, 8, 1, 13, 2, 18, 2, 24, 2, 30, 2, 36, 2, 43, 2, 50, 2, 57, 2, 65, 2, 73, 2, 81, 3, 89, 3, 97, 3, 105, 3, 114, 3, 123, 3, 132, 3, 141, 3, 150, 3, 160, 3, 169, 3, 179, 3, 189, 3, 199, 3, 209, 3, 219, 3, 229, 3, 240, 3, 250, 4, 261, 4, 272
Offset: 0

Views

Author

Vikram Prasad, Feb 08 2025

Keywords

Crossrefs

Interspersion of A048766 and A129011.

Programs

  • Mathematica
    a[n_]:=If[Mod[n,2]==0,Floor[n^(1/3)],Floor[n^(4/3)]]; (* James C. McMahon, Apr 11 2025 *)
  • Python
    import gmpy2
    def a(n): return int(gmpy2.iroot(n**4 if n&1 else n, 3)[0])

A134919 Floor(n^(5/3)).

Original entry on oeis.org

1, 3, 6, 10, 14, 19, 25, 32, 38, 46, 54, 62, 71, 81, 91, 101, 112, 123, 135, 147, 159, 172, 186, 199, 213, 228, 243, 258, 273, 289, 305, 322, 339, 356, 374, 392, 410, 429, 448, 467, 487, 507, 527, 548, 569, 590, 612, 633, 656
Offset: 1

Views

Author

Mohammad K. Azarian, Nov 17 2007

Keywords

Crossrefs

Programs

Showing 1-5 of 5 results.