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.

Previous Showing 21-25 of 25 results.

A144998 Denominators of an Egyptian fraction for 1/Sqrt[23] = 0.208514414...

Original entry on oeis.org

5, 118, 25102, 3098488794, 14128130137829281462, 485584015670165519973653386760357384912, 314540562973936255020142367073783456663449048259761865641894253491267983125499
Offset: 1

Views

Author

Artur Jasinski, Sep 28 2008

Keywords

Crossrefs

Programs

  • Mathematica
    a = {}; k = N[1/Sqrt[23], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)

A144999 Denominators of an Egyptian fraction for 1/Sqrt[24] = 0.20412414523...

Original entry on oeis.org

5, 243, 112122, 26152629083, 896398925366011889258, 3015244976414322457555463218875802090369767, 64507244652051292999487806064926450248354528876835935231409173161547519285211444127477
Offset: 1

Views

Author

Artur Jasinski, Sep 28 2008

Keywords

Crossrefs

Programs

  • Mathematica
    a = {}; k = N[1/Sqrt[24], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)

A145000 Denominators of an Egyptian fraction for 1/Sqrt[26] = 0.196116135138...

Original entry on oeis.org

6, 34, 26523, 1562387946, 2711148268367282801, 12495200597418585355327760706720583332, 249241682973403163668428197861526798556923221288701528163601730404432403391
Offset: 1

Views

Author

Artur Jasinski, Sep 28 2008

Keywords

Crossrefs

Programs

  • Mathematica
    a = {}; k = N[1/Sqrt[26], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)

A145001 Denominators of an Egyptian fraction for 1/Sqrt[27] = 0.19245...

Original entry on oeis.org

6, 39, 7023, 123003383, 30009972034709604, 2284252506432349791885755473056239, 9742053754355575036462674739863470880211838469604940624314922115462
Offset: 1

Views

Author

Artur Jasinski, Sep 28 2008

Keywords

Crossrefs

Programs

  • Mathematica
    a = {}; k = N[1/Sqrt[27], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)

A145002 Denominators of an Egyptian fraction for 1/Sqrt[28] = 0.1889822365...

Original entry on oeis.org

6, 45, 10713, 324564970, 180179551708668257, 66100039883449216745724149409859980, 5970964373869392740489950614747811004676487208587055130790649750452409
Offset: 1

Views

Author

Artur Jasinski, Sep 28 2008

Keywords

Crossrefs

Programs

  • Mathematica
    a = {}; k = N[1/Sqrt[28], 1000]; Do[s = Ceiling[1/k]; AppendTo[a, s]; k = k - 1/s, {n, 1, 10}]; a (*Artur Jasinski*)
Previous Showing 21-25 of 25 results.