%I A063630
%S A063630 1,5,6,10,30,29,43,45,36,73,75,92,68,116,102,85,98,141,166,151,109,154,
%T A063630 172,196,175,176,217,244,245,207,275,226,242,289,269,263,297,261,326,
%U A063630 296,355,335,369,336,412,414,360,458,394,457,404
%N A063630 Smallest power of 9 having just n 4's in its decimal representation.
%t A063630 a = {}; Do[k = 1; While[ Count[ IntegerDigits[9^k], 4] != n, k++ ]; a
= Append[a, k], {n, 0, 50} ]; a
%Y A063630 Sequence in context: A075904 A018834 A029943 this_sequence A119102 A162015
A162017
%Y A063630 Adjacent sequences: A063627 A063628 A063629 this_sequence A063631 A063632
A063633
%K A063630 base,nonn
%O A063630 0,2
%A A063630 Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 10 2001
|