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

 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 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 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.

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