A063628 Smallest k such that 9^k has exactly n 2's in its decimal representation.
1, 3, 15, 12, 28, 26, 30, 39, 70, 50, 54, 82, 93, 106, 105, 80, 110, 121, 130, 135, 156, 175, 173, 183, 174, 211, 194, 264, 158, 216, 285, 251, 306, 262, 308, 298, 263, 322, 346, 323, 354, 276, 375, 380, 419, 350, 404, 432, 384, 465, 403
Offset: 0
Programs
-
Mathematica
a = {}; Do[k = 1; While[ Count[ IntegerDigits[9^k], 2] != n, k++ ]; a = Append[a, k], {n, 0, 50} ]; a
Extensions
Name corrected by Jon E. Schoenfield, Jun 26 2018