OFFSET
1,1
LINKS
Harry J. Smith, Table of n, a(n) for n=1..1000
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
KEYWORD
easy,sign
AUTHOR
Jason Earls, Jul 04 2001
STATUS
approved