OFFSET
1,3
LINKS
FORMULA
EXAMPLE
n=35, sigma(35) = 35 + 5 + 7 + 1 = 48 = 2*2*2*2*3, so a(35)=5.
MAPLE
with(numtheory):a:=proc(n) if n=0 then 0 else bigomega(sigma(n)) fi end: seq(a(n), n=1..105); # Zerinvary Lajos, Apr 11 2008
MATHEMATICA
Array[PrimeOmega@ DivisorSigma[1, #] &, 105] (* Michael De Vlieger, Nov 08 2017 *)
PROG
(PARI) a(n) = bigomega(sigma(n)); \\ Michel Marcus, Nov 07 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Nov 23 2000
EXTENSIONS
Offset corrected by Antti Karttunen, Nov 07 2017
STATUS
approved