login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A100669
Zeros of the Mertens function that are also prime.
1
2, 101, 149, 163, 331, 353, 401, 419, 541, 607, 811, 823, 853, 877, 883, 919, 1013, 1279, 1289, 1291, 1297, 1523, 1531, 1543, 1861, 2017, 2099, 2113, 2309, 2689, 3607, 3613, 4603, 4637, 4723, 5107, 5113, 5197, 5261, 5849, 6011, 6067, 6089, 7187, 7853
OFFSET
0,1
MATHEMATICA
Select[Range[4000], Plus @@ MoebiusMu[Range[#]] == 0 && PrimeQ[#] &] (* Carl Najafi, Aug 17 2011 *)
PROG
(PARI) s=0; for(n=1, 1e4, s+=moebius(n); if(!s && isprime(n), print1(n", "))) \\ Charles R Greathouse IV, Jan 28 2014
CROSSREFS
Cf. A028442.
Sequence in context: A126135 A016034 A171988 * A142050 A195903 A042249
KEYWORD
nonn
AUTHOR
Robert Happelberg (roberthappelberg(AT)yahoo.com), Dec 05 2004
STATUS
approved