A023836 Sum of exponents in prime-power factorization of C(4n,2n-2).
0, 3, 4, 6, 6, 8, 8, 11, 11, 12, 11, 14, 13, 16, 13, 17, 14, 18, 15, 19, 20, 21, 21, 23, 23, 22, 22, 24, 22, 27, 22, 29, 26, 28, 27, 31, 29, 31, 31, 31, 31, 32, 32, 35, 34, 35, 32, 39, 34, 37, 35, 38, 37, 40, 37, 41, 40, 42, 40, 43, 43, 44, 43, 46, 43, 45, 42, 46, 45, 48, 43, 50, 46, 48, 50, 50, 50
Offset: 1
Keywords
Links
- Ivan Neretin, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Join[{0},Rest[Total[Last[Transpose[FactorInteger[#]]]]&/@(Binomial[ 4#,2#-2]&/@Range[80])]] (* Harvey P. Dale, Jun 07 2011 *) a[n_] := PrimeOmega[Binomial[4*n, 2*n-2]]; Array[a, 100] (* Amiram Eldar, Jun 13 2025 *)
-
PARI
a(n) = bigomega(binomial(4*n,2*n-2)); \\ Amiram Eldar, Jun 13 2025
Formula
From Amiram Eldar, Jun 13 2025: (Start)
a(n) = A023817(2*n).