A277140 Earliest substring of the decimal expansion of Pi containing any of the 10 decimal digits at least once and disjoint from all earlier such substrings.
314159265358979323846264338327950, 288419716939937510, 5820974944592307816, 406286208998628034825342117, 67982148086513, 282306647093844609550582231, 7253594081284811174502841027019385211055596, 4462294895493038196442881097, 566593344612847564823378678316527120, 1909145648566923460348610454326648213393607
Offset: 1
Examples
The first substring of Pi containing all 10 digits is 314159265358979323846264338327950. The next substring of Pi is 288419716939937510. The next substring of Pi is 5820974944592307816. The next substring of Pi is 406286208998628034825342117.
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..10000
Programs
-
Mathematica
pi = RealDigits[Pi, 10, 300][[1]]; f := Block[{k = 10}, While[ Union[ Take[pi, k]] != Range[0, 9], k++]; a = Take[pi, k]; pi = Drop[pi, k]; FromDigits@ a]; lst = {}; Do[ AppendTo[lst, f], {10}]; lst (* Robert G. Wilson v, Nov 17 2016 *)
Extensions
Definition clarified by Felix Fröhlich, Oct 30 2016
Comments