OFFSET
4,2
LINKS
Ivan Neretin, Table of n, a(n) for n = 4..10000
FORMULA
a(n) = Omega( C(4n,n-4) ) = A001222( C(4n,n-4) ), n > 3.
MAPLE
with(numtheory): A023830:=n->bigomega(binomial(4*n, n-4)): seq(A023830(n), n=4..100); # Wesley Ivan Hurt, Oct 13 2014
MATHEMATICA
Join[{0}, Table[Total[Transpose[FactorInteger[Binomial[4n, n-4]]][[2]]], {n, 5, 80}]] (* Harvey P. Dale, Oct 12 2014 *)
PROG
(PARI) a(n) = bigomega(binomial(4*n, n-4)); \\ Michel Marcus, Oct 12 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Offset changed by Wesley Ivan Hurt, Oct 13 2014
STATUS
approved