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

1, 12, 15, 25, 24, 40, 29, 53, 51, 84, 89, 99, 126, 107, 117, 141, 153, 167, 187, 171, 149, 232, 212, 242, 238, 257, 254, 248, 267, 272, 303, 308, 378, 340, 309, 387, 352, 382, 396, 397, 392, 438, 454, 472, 439, 436, 484, 420, 492, 467, 544

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A253235 A050480 A290508 * A357867 A350807 A124521

Adjacent sequences: A063601 A063602 A063603 * A063605 A063606 A063607

Keyword

base,nonn

Author

Robert G. Wilson v, Aug 10 2001

Extensions

Name corrected by Jon E. Schoenfield, Jun 26 2018

Status

approved