login
Smallest k such that 6^k has exactly n 8's in its decimal representation.
0

%I #6 Jun 26 2018 19:12:50

%S 1,12,15,25,24,40,29,53,51,84,89,99,126,107,117,141,153,167,187,171,

%T 149,232,212,242,238,257,254,248,267,272,303,308,378,340,309,387,352,

%U 382,396,397,392,438,454,472,439,436,484,420,492,467,544

%N Smallest k such that 6^k has exactly n 8's in its decimal representation.

%t a = {}; Do[k = 1; While[ Count[ IntegerDigits[6^k], 8] != n, k++ ]; a = Append[a, k], {n, 0, 50} ]; a

%K base,nonn

%O 0,2

%A _Robert G. Wilson v_, Aug 10 2001

%E Name corrected by _Jon E. Schoenfield_, Jun 26 2018