login
A239013
Exponents m such that the decimal expansion of 8^m exhibits its first zero from the right later than any previous exponent.
7
0, 2, 3, 5, 6, 8, 9, 11, 12, 13, 17, 24, 27, 43, 144, 342, 633, 653, 2642, 6966, 16124, 84595, 225177, 4069057, 4890280, 6298187, 39573326, 99250579, 242281125, 1007075831, 4705063695, 5439666500, 5741331846, 6168193506, 9297912451, 34411164318, 36390662612, 265816303567
OFFSET
1,2
COMMENTS
Assume that a zero precedes all decimal expansions. This will take care of those cases in A030704.
Inspired by the seqfan list discussion Re: "possible sequence", beginning with David Wilson 7:57 PM Mar 06 2014 and continued by M. F. Hasler, Allan C. Wechsler and Franklin T. Adams-Watters.
Not just three times A031142; although {99250579, 6168193506, 9297912451, 34411164318, 36390662612} are possible candidates.
MATHEMATICA
f[n_] := Position[ Reverse@ Join[{0}, IntegerDigits[ PowerMod[8, n, 10^500]]], 0, 1, 1][[1, 1]]; k = mx = 0; lst = {}; While[k < 200000001, c = f[k]; If[c > mx, mx = c; AppendTo[ lst, k]; Print@ k]; k++]; lst
KEYWORD
nonn,base
EXTENSIONS
a(29)-a(35) from Bert Dobbelaere, Jan 21 2019
a(36)-a(38) from Chai Wah Wu, Jan 18 2020
STATUS
approved