%I A063559
%S A063559 1,5,12,20,59,58,86,63,72,139,125,159,136,211,204,170,196,197,271,302,
%T A063559 218,308,344,392,309,351,434,488,490,414,529,452,484,523,538,526,594,
%U A063559 522,605,592,705,670,649,672,771,785,691,819,788,887,808
%N A063559 Smallest power of 3 having just n 4's in its decimal representation.
%t A063559 a = {}; Do[k = 1; While[ Count[ IntegerDigits[3^k], 4] != n, k++ ]; a 
               = Append[a, k], {n, 0, 50} ]; a
%Y A063559 Sequence in context: A099192 A047077 A086570 this_sequence A121291 A097984 
               A028347
%Y A063559 Adjacent sequences: A063556 A063557 A063558 this_sequence A063560 A063561 
               A063562
%K A063559 base,nonn
%O A063559 0,2
%A A063559 Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 10 2001