%I A089579
%S A089579 3,11,39,123,365,1109,3393,10489,32668,102229,320988,1010194,3184136,
%T A089579 10046919,31723590,100216743,316694003,1001003330,3164437423,
%U A089579 10004650116,31632790242,100021566155,316274216760,1000100055682
%N A089579 Total number of exact powers below 10^n (without counting duplicates).
%t A089579 Table[lim=10^n-1; Sum[ -(Floor[lim^(1/k)]-1)*MoebiusMu[k], {k,2,Floor[Log[2,
               lim]]}], {n,30}] - T. D. Noe (noe(AT)sspectra.com), Nov 16 2006
%Y A089579 Cf. A001597.
%Y A089579 Sequence in context: A027528 A112674 A064086 this_sequence A166336 A002783 
               A007482
%Y A089579 Adjacent sequences: A089576 A089577 A089578 this_sequence A089580 A089581 
               A089582
%K A089579 nonn
%O A089579 1,1
%A A089579 Martin Renner (martin.renner(AT)gmx.net), Dec 29 2003
%E A089579 2 more terms from Martin Renner (martin.renner(AT)gmx.net), Oct 02 2004
%E A089579 More terms from T. D. Noe (noe(AT)sspectra.com), Nov 16 2006