|
Search: id:A049516
|
|
|
| A049516 |
|
Starting index of a string of 4 or more consecutive equal digits in decimal expansion of Pi. |
|
+0
6
|
|
| 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; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
Digits 3,1,4,... are indexed 1,2,3,...
|
|
MATHEMATICA
|
ConsecutiveOccurrences1[alist_, n_] := Flatten @ Position[ Apply[ SameQ, Partition[ alist, n, 1], {1}], True]; ConsecutiveOccurrences1[ First[ RealDigits[Pi, 10, 33172]], 4]
|
|
CROSSREFS
|
Cf. A049514, A049515, A049517, A049518, A049519, A049520, A049521, A049522, A049523.
Adjacent sequences: A049513 A049514 A049515 this_sequence A049517 A049518 A049519
Sequence in context: A083644 A061225 A083645 this_sequence A049517 A121321 A084072
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Harvey P. Dale (hpd1(AT)is2.nyu.edu)
|
|
EXTENSIONS
|
Edited by Robert G. Wilson v (rgwv(AT)rgwv.com), May 09 2003
|
|
|
Search completed in 0.002 seconds
|
