login
A063624
Smallest k such that 8^k has exactly n 8's in its decimal representation.
0
2, 1, 11, 17, 13, 38, 57, 47, 55, 67, 49, 78, 71, 89, 131, 113, 114, 141, 153, 143, 171, 169, 213, 142, 179, 214, 232, 236, 242, 268, 287, 256, 241, 278, 393, 296, 324, 313, 369, 310, 319, 387, 350, 366, 417, 464, 297, 397, 443, 477, 410
OFFSET
0,1
MATHEMATICA
a = {}; Do[k = 1; While[ Count[ IntegerDigits[8^k], 8] != n, k++ ]; a = Append[a, k], {n, 0, 50} ]; a
CROSSREFS
Sequence in context: A080958 A138351 A120293 * A101851 A300455 A270264
KEYWORD
base,nonn
AUTHOR
Robert G. Wilson v, Aug 10 2001
EXTENSIONS
Name corrected by Jon E. Schoenfield, Jun 26 2018
STATUS
approved