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

1, 4, 10, 18, 38, 32, 49, 51, 86, 84, 83, 105, 144, 138, 103, 160, 146, 170, 206, 229, 180, 198, 225, 227, 237, 292, 256, 302, 326, 324, 260, 316, 352, 362, 388, 419, 448, 386, 431, 497, 494, 414, 416, 490, 482, 473, 508, 562, 547, 582, 469

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A217745 A213949 A009913 * A009912 A318070 A073262

Adjacent sequences: A063588 A063589 A063590 * A063592 A063593 A063594

Keyword

base,nonn

Author

Robert G. Wilson v, Aug 10 2001

Extensions

Name corrected by Jon E. Schoenfield, Jun 26 2018

Status

approved