%I A100765
%S A100765 3,41,59,66,102,151,165,167,233,239,255,354,357,359,367,402,406,409,421,
%T A100765 426,429,609,638,782,786,797,826,854,885,887,890,894,897,907,911,1015,
%U A100765 1019,1221,1259,1281,1283,1298,1301,1303,1307,1319,1327,1493,1526,1533
%N A100765 Numbers n for which the values of the Moebius function (A008683) and 
               the Mertens function (A002321) are both -1.
%C A100765 This sequence is a subset of A100306, Numbers n for which the values 
               of the Moebius function and the Mertens function agree.
%H A100765 PrimeFan, <a href="http://primefan.tripod.com/EsotericIntegerSequences.html">
               Esoteric Integer Sequences</a>
%e A100765 a(5) = 102 because it is a sphenic (exactly 3 distinct prime factors, 
               A007304) number, so the Mobius function yields -1 and the sum of 
               that value and the previous Mobius values (the Mertens function) 
               is also -1.
%t A100765 (* If not already defined *) If[Names["Mertens"] == {}, Mertens[x_] := 
               Plus @@ MoebiusMu[Range[1, x]]]; Select[Range[2500], MoebiusMu[ # 
               ] == -1 && Mertens[ # ] == -1 &]
%Y A100765 Sequence in context: A110468 A105906 A157009 this_sequence A092168 A080347 
               A106978
%Y A100765 Adjacent sequences: A100762 A100763 A100764 this_sequence A100766 A100767 
               A100768
%K A100765 nonn
%O A100765 0,1
%A A100765 Alonso Delarte (alonso.delarte(AT)gmail.com), Jan 03 2005
%E A100765 Replaced a geocities.com link - R. J. Mathar (mathar(AT)str.leidenuniv.nl), 
               Oct 30 2009