Longest run of the digit S000171(n) in the decimal form of 3^n.
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 1, 1, 1, 1, 2, 2, 1, 1, 2, 1, 2, 1, 2, 2, 2, 2, 2, 3, 4, 3, 3, 3, 2, 2, 3, 2, 2, 1, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1, 1, 2, 2, 3, 2, 2, 2, 3, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2
0
For the first number n producing a given run of digits, see A215727. Sequence A215733 lists the digit that is repeated.
T. D. Noe, Plot of 1001 terms
T. D. Noe, Table of 1001 terms
(Mma) t = Table[s = Sort[Split[IntegerDigits[3^n]]]; len = Length[s[[-1]]]; u = Flatten[Select[s, Length[#] == len &, 1]]; {u[[1]], Length[u]}, {n, 0, 100}]; Transpose[t][[2]]
Cf. S000169-S000171, A215727, A215733.
nonn,base
T. D. Noe, Aug 06 2014