login
The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A049516 Starting index of a string of 4 or more consecutive equal digits in decimal expansion of Pi. 5
763, 764, 765, 1590, 4752, 4903, 5242, 5323, 5864, 7965, 12487, 12701, 13391, 16733, 17535, 17536, 17989, 19438, 19447, 19448, 21881, 22754, 24467, 24468, 28468, 28469, 29505, 29869, 30797, 31901, 32428, 32479, 32789, 32790, 33108 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Digits 3,1,4,... are indexed 1,2,3,...

LINKS

Table of n, a(n) for n=1..35.

MATHEMATICA

ConsecutiveOccurrences1[alist_, n_] := Flatten @ Position[ Apply[ SameQ, Partition[ alist, n, 1], {1}], True]; ConsecutiveOccurrences1[ First[ RealDigits[Pi, 10, 33172]], 4]

SequencePosition[RealDigits[Pi, 10, 34000][[1]], {x_, x_, x_, x_}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jan 16 2019 *)

CROSSREFS

Cf. A049514, A049515, A049517, A049518, A049519, A049520, A049521, A049522, A049523.

Sequence in context: A210081 A083645 A145718 * A049517 A121321 A084072

Adjacent sequences:  A049513 A049514 A049515 * A049517 A049518 A049519

KEYWORD

nonn,base

AUTHOR

Harvey P. Dale

EXTENSIONS

Edited by Robert G. Wilson v, May 09 2003

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 29 17:41 EDT 2021. Contains 346346 sequences. (Running on oeis4.)