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

%I #6 Jun 26 2018 19:04:41

%S 2,1,11,17,13,38,57,47,55,67,49,78,71,89,131,113,114,141,153,143,171,

%T 169,213,142,179,214,232,236,242,268,287,256,241,278,393,296,324,313,

%U 369,310,319,387,350,366,417,464,297,397,443,477,410

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

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

%K base,nonn

%O 0,1

%A _Robert G. Wilson v_, Aug 10 2001

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