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

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

Links

Table of n, a(n) for n=0..50.

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

Adjacent sequences: A063621 A063622 A063623 * A063625 A063626 A063627

Keyword

base,nonn

Author

Robert G. Wilson v, Aug 10 2001

Extensions

Name corrected by Jon E. Schoenfield, Jun 26 2018

Status

approved