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

1, 4, 7, 19, 27, 32, 39, 53, 77, 92, 104, 91, 90, 120, 122, 147, 146, 141, 191, 204, 199, 246, 280, 249, 200, 251, 294, 188, 272, 276, 327, 282, 307, 341, 397, 339, 319, 401, 384, 382, 354, 306, 467, 412, 478, 493, 456, 463, 497, 576, 524

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A032723 A231374 A173017 * A024824 A164265 A174465

Adjacent sequences: A063602 A063603 A063604 * A063606 A063607 A063608

Keyword

base,nonn

Author

Robert G. Wilson v, Aug 10 2001

Extensions

Name corrected by Jon E. Schoenfield, Jun 26 2018

Status

approved