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

1, 11, 20, 12, 33, 41, 58, 87, 45, 76, 91, 106, 114, 136, 156, 150, 115, 140, 198, 190, 218, 189, 241, 231, 283, 254, 243, 311, 249, 275, 347, 345, 353, 294, 460, 361, 372, 496, 420, 431, 499, 424, 484, 546, 428, 449, 483, 558, 613, 540, 622

Offset

0,2

Links

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

Mathematica

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

Crossrefs

Sequence in context: A003284 A257401 A283903 * A102815 A105957 A105958

Adjacent sequences: A063586 A063587 A063588 * A063590 A063591 A063592

Keyword

base,nonn

Author

Robert G. Wilson v, Aug 10 2001

Extensions

Name corrected by Jon E. Schoenfield, Jun 26 2018

Status

approved