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

A083643 Starting positions of strings of four 9's in the decimal expansion of Pi.

Original entry on oeis.org

762, 763, 764, 17988, 19437, 19446, 19447, 22753, 31900, 42095, 56988, 56989, 81293, 120564, 140953, 161862, 161863, 177122, 182604, 191104, 193034, 193035, 193036, 204198, 210140, 211794, 220507, 220568, 220569, 224317, 235425, 235775
Offset: 1

Views

Author

Rick L. Shepherd, May 05 2003

Keywords

Crossrefs

Cf. A083642 (three 9's), A083644 (five 9's).

Programs

  • Mathematica
    Transpose[StringPosition[StringDrop[ToString[N[Pi,9! ]],2],"9999"]][[1]] (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
    Module[{digs=240000,p},p=RealDigits[Pi,10,digs][[1]];SequencePosition[p,{9,9,9,9}][[All,1]]-1] (* Harvey P. Dale, Jan 12 2023 *)

A083645 Starting positions of strings of six 9's in the decimal expansion of Pi.

Original entry on oeis.org

762, 193034, 1722776, 1722777, 1985813, 2878443, 3062881, 3389380, 3389381, 3529731, 4313727, 4313728, 5466169, 5466170, 6951812, 7298585, 8498459, 11295221, 12943563, 13347753, 14388723, 14593770, 14593771, 14670295, 15256174, 15256175, 15866194, 16192557, 16785635
Offset: 1

Views

Author

Rick L. Shepherd, May 06 2003

Keywords

Crossrefs

Cf. A083644 (five 9's), A083646 (seven 9's).

Programs

  • Mathematica
    SequencePosition[RealDigits[Pi,10,15*10^6][[1]],{9,9,9,9,9,9}][[All,1]]-1 (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 19 2017 *)

Extensions

More terms from Jinyuan Wang, Mar 01 2020
Showing 1-2 of 2 results.