login
A062007
a(n) = mu(n)*prime(n).
1
2, -3, -5, 0, -11, 13, -17, 0, 0, 29, -31, 0, -41, 43, 47, 0, -59, 0, -67, 0, 73, 79, -83, 0, 0, 101, 0, 0, -109, -113, -127, 0, 137, 139, 149, 0, -157, 163, 167, 0, -179, -181, -191, 0, 0, 199, -211, 0, 0, 0, 233, 0, -241, 0, 257, 0, 269, 271, -277, 0, -283, 293, 0, 0, 313, -317, -331, 0, 347, -349, -353, 0, -367, 373, 0
OFFSET
1,1
LINKS
MATHEMATICA
Table[MoebiusMu[n]*Prime[n], {n, 100}] (* G. C. Greubel, May 03 2022 *)
PROG
(PARI) q=[]; for(n=1, 200, q=concat(q, moebius(n)*prime(n))); q
(SageMath) [moebius(n)*nth_prime(n) for n in (1..100)] # G. C. Greubel, May 03 2022
CROSSREFS
Sequence in context: A240979 A368819 A171034 * A031067 A300392 A335706
KEYWORD
easy,sign
AUTHOR
Jason Earls, Jul 04 2001
STATUS
approved