login
A244601
Position of first occurrence of n consecutive equal digits in the decimal expansion of e starting after the decimal point.
7
1, 31, 47, 723, 4992, 89296, 210482, 384340, 110702779, 419970418
OFFSET
1,2
COMMENTS
Position 31 is occupied by the first of two consecutive 6's. Position 47 is occupied by the first of three consecutive 9's. Position 723 is occupied by the first of four consecutive 8's.
EXAMPLE
Decimal expansion of e:
2.|7|18281828459045235360287471352|66|24977572470936|999|59574966967627724..
MATHEMATICA
e = Rest[First[RealDigits[E, 10, 2000000]]];
A244601 = ConstantArray[0, 8];
For[i = 1, i <= Length[e], i++,
t = e[[i]]; c = 1;
While[e[[i + c]] == t, c++];
If[A244601[[c]] == 0, A244601[[c]] = i; i = i + c - 1; Continue[]]
]; A244601 (* Robert Price, Sep 07 2019 *)
CROSSREFS
Cf. A001113. Resulting repdigits are A244602.
Sequence in context: A127576 A139896 A289839 * A004224 A194129 A288291
KEYWORD
nonn,base,more
AUTHOR
Felix Fröhlich, Jul 01 2014
EXTENSIONS
a(5)-(8) from Jens Kruse Andersen, Jul 20 2014
a(9)-(10) from Felix Fröhlich, Aug 26 2014
Prepended a(1), Felix Fröhlich, Aug 31 2014
STATUS
approved