|
%I #10 Nov 08 2017 17:50:52
%S 1,3,3,4,6,7,8,8,7,9,12,11,14,13,14,12,15,14,15,18,17,17,19,18,17,23,
%T 22,21,25,23,26,21,23,22,24,23,24,27,27,27,27,29,27,28,31,30,33,28,31,
%U 32,33,36,38,36,38,37,35,39,40,41,41,41,39,34,38,38,38,39,41,39,46,41,43,45,43,45,48,47
%N Sum of exponents in prime-power factorization of C(5n,n).
%H Ivan Neretin, <a href="/A023837/b023837.txt">Table of n, a(n) for n = 1..10000</a>
%p with(numtheory):a:=proc(n) if n=0 then 0 else bigomega(binomial(5*n,n)) fi end: seq(a(n), n=1..78); # _Zerinvary Lajos_, Apr 11 2008
%t Table[PrimeOmega[Binomial[5 n, n]], {n, 78}] (* _Ivan Neretin_, Nov 08 2017 *)
%K nonn
%O 1,2
%A _Clark Kimberling_
|
