OFFSET
1,4
COMMENTS
The 0 terms identify for the prime numbers.
LINKS
MAPLE
with(numtheory): a := n -> mobius(n) + bigomega(n):
seq(a(n), n = 1..78); # Peter Luschny, Jul 08 2017
MATHEMATICA
Table[MoebiusMu[k] + PrimeOmega[k], {k, 200}]
PROG
(PARI) A249901(n) = (moebius(n) + bigomega(n)); \\ Antti Karttunen, Jul 08 2017
(Magma) [n eq 1 select 1 else &+[p[2]: p in Factorization(n)]+ MoebiusMu(n): n in [1..120]]; // Vincenzo Librandi, Jul 09 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Ke Xiao, Jan 13 2015
STATUS
approved