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.

A083633 Starting positions of strings of five '7's in the decimal expansion of Pi.

Original entry on oeis.org

162248, 283693, 322347, 399579, 399580, 401865, 427363, 452071, 452072, 518222, 788763, 1006927, 1006928, 1039540, 1059121, 1109342, 1143800, 1269116, 1543244, 1571225, 1589715, 1764582, 1846087, 2008354, 2264927, 2309218, 2309219
Offset: 1

Views

Author

Rick L. Shepherd, May 04 2003

Keywords

Crossrefs

Cf. A083632 (four '7's), A083634 (six '7's), A049517 (at least 5 consecutive equal digits), A049521 (exactly 5 consecutive equal digits).

A083631 Starting positions of strings of three 7's in the decimal expansion of Pi.

Original entry on oeis.org

1589, 1590, 4575, 5241, 5242, 5322, 5323, 5355, 5450, 5863, 5864, 11298, 11733, 12661, 14292, 15501, 17234, 17502, 18516, 19903, 20404, 21423, 21571, 23538, 23749, 24373, 25551, 25788, 25858, 26796, 29504, 29505, 30988, 32478, 32479
Offset: 1

Views

Author

Rick L. Shepherd, May 04 2003

Keywords

Comments

Position counted from and after decimal point. - Harvey P. Dale, Mar 13 2023

Crossrefs

Cf. A050254 (two 7's), A083632 (four 7's).

Programs

  • Mathematica
    q=9!;z=7;a=RealDigits[Pi,10,q];lst={};Do[b=a[[1]][[n]];c=a[[1]][[n+1]];d=a[[1]][[n+2]];If[b==z&&c==z&&d==z,AppendTo[lst,n-1]],{n,q-2}];lst (* Vladimir Joseph Stephan Orlovsky, Jun 19 2009 *)
    SequencePosition[RealDigits[Pi,10,33000][[1]],{7,7,7}][[;;,1]]-1 (* Harvey P. Dale, Mar 13 2023 *)
Showing 1-2 of 2 results.