%I A093772
%S A093772 1,6,10,14,15,21,22,26,34,35,38,39,51,55,57,58,62,65,77,85,86,87,91,93,
%T A093772 94,95,119,122,123,129,134,142,143,145,146,158,159,161,185,202,203,205,
%U A093772 206,209,210,213,214,215,217,218,219,221,253,254,265,278,299,301,302
%N A093772 a[n] is the smallest integer at which the value of "truncated Mertens-function" 
               (=A088004) equals n.
%C A093772 Truncated Mertens-function = summatory-Moebius when argument runs through 
               nonprimes.
%t A093772 mer[x_] :=mer[x]=mer[x-1]+MoebiusMu[x]; mer[0]=0;$RecursionLimit=1000; 
               t=Table[mer[w]+PrimePi[w], {w, 1, 1000}] Table[Min[Flatten[Position[t, 
               j]]], {j, 1, 200}]
%Y A093772 Cf. A008682, A088004, A002321, A059071, A093773.
%Y A093772 Sequence in context: A006881 A030229 A162730 this_sequence A046400 A100660 
               A088709
%Y A093772 Adjacent sequences: A093769 A093770 A093771 this_sequence A093773 A093774 
               A093775
%K A093772 nonn
%O A093772 1,2
%A A093772 Labos E. (labos(AT)ana.sote.hu), Apr 28 2004