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.

A083637 Starting positions of strings of three 8's in the decimal expansion of Pi.

This page as a plain text file.
%I A083637 #18 Feb 16 2025 08:32:49
%S A083637 4751,4752,4985,5871,6070,6850,9338,10229,10527,14298,16763,16910,
%T A083637 17164,18483,19469,19752,20337,20807,21225,22192,22216,22770,23079,
%U A083637 25062,25196,26886,27750,30086,30633,30687,30796,30797,32251,33850,35639
%N A083637 Starting positions of strings of three 8's in the decimal expansion of Pi.
%H A083637 Harvey P. Dale, <a href="/A083637/b083637.txt">Table of n, a(n) for n = 1..1000</a>
%H A083637 <a href="/index/Ph#Pi314">Index entries for sequences related to the number Pi</a>
%H A083637 Dave Andersen, <a href="http://www.angio.net/pi/piquery">Pi-Search Page</a>
%H A083637 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PiDigits.html">Pi Digits.</a>
%t A083637 q=9!;z=8;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 *)
%t A083637 SequencePosition[RealDigits[Pi,10,36000][[1]],{8,8,8}][[All,1]]-1 (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Oct 02 2018 *)
%Y A083637 Cf. A050263 (two 8's), A083638 (four 8's).
%K A083637 base,nonn
%O A083637 1,1
%A A083637 _Rick L. Shepherd_, May 05 2003