OFFSET
0,8
LINKS
Giovanni Resta, Table of n, a(n) for n = 0..10000
FORMULA
MAPLE
with(numtheory):with(combinat):a:=proc(n) if n=0 then 0 else bigomega(numbpart(n)) fi end: seq(a(n), n=0..104); # Zerinvary Lajos, Apr 11 2008
MATHEMATICA
PrimeOmega[PartitionsP[Range[0, 110]]] (* Harvey P. Dale, Dec 26 2014 *)
PROG
(PARI) a(n)={bigomega(numbpart(n))} \\ Andrew Howroyd, Dec 28 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Jason Earls, Jul 05 2003
STATUS
approved