|
| |
|
|
A100765
|
|
Numbers n for which the values of the Moebius function (A008683) and the Mertens function (A002321) are both -1.
|
|
1
| |
|
|
3, 41, 59, 66, 102, 151, 165, 167, 233, 239, 255, 354, 357, 359, 367, 402, 406, 409, 421, 426, 429, 609, 638, 782, 786, 797, 826, 854, 885, 887, 890, 894, 897, 907, 911, 1015, 1019, 1221, 1259, 1281, 1283, 1298, 1301, 1303, 1307, 1319, 1327, 1493, 1526, 1533
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,1
|
|
|
COMMENTS
| This sequence is a subset of A100306, Numbers n for which the values of the Moebius function and the Mertens function agree.
|
|
|
LINKS
| PrimeFan, Esoteric Integer Sequences
|
|
|
EXAMPLE
| 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.
|
|
|
MATHEMATICA
| (* If not already defined *) If[Names["Mertens"] == {}, Mertens[x_] := Plus @@ MoebiusMu[Range[1, x]]]; Select[Range[2500], MoebiusMu[ # ] == -1 && Mertens[ # ] == -1 &]
|
|
|
CROSSREFS
| Sequence in context: A171058 A105906 A157009 * A092168 A080347 A106978
Adjacent sequences: A100762 A100763 A100764 * A100766 A100767 A100768
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Alonso Delarte (alonso.delarte(AT)gmail.com), Jan 03 2005
|
|
|
EXTENSIONS
| Replaced a geocities.com link - R. J. Mathar (mathar(AT)str.leidenuniv.nl), Oct 30 2009
|
| |
|
|
