%I A063627
%S A063627 1,2,6,17,16,21,51,46,42,50,65,60,81,64,101,89,107,179,130,158,167,194,
%T A063627 191,164,149,197,192,202,257,227,245,244,253,304,264,296,306,321,292,
%U A063627 302,295,314,335,346,334,450,388,406,359,394,428
%N A063627 Smallest power of 9 having just n 1's in its decimal representation.
%t A063627 a = {}; Do[k = 1; While[ Count[ IntegerDigits[9^k], 1] != n, k++ ]; a 
               = Append[a, k], {n, 0, 50} ]; a
%Y A063627 Sequence in context: A118305 A139629 A057497 this_sequence A069014 A105146 
               A024310
%Y A063627 Adjacent sequences: A063624 A063625 A063626 this_sequence A063628 A063629 
               A063630
%K A063627 base,nonn
%O A063627 0,2
%A A063627 Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 10 2001