%I #7 Nov 02 2017 17:52:29
%S 1,3,4,6,4,8,7,8,8,10,10,14,11,12,11,14,11,14,14,15,14,20,16,20,17,17,
%T 20,20,17,22,19,22,19,21,20,23,21,23,22,26,20,26,27,28,29,30,27,31,28,
%U 28,28,32,26,34,31,32,32,33,33,36,33,35,32,36,30,34,33,33,32,38,33,38,34,35,39,39,36,39
%N Sum of exponents in prime-power factorization of C(3n,n+1).
%H Ivan Neretin, <a href="/A023823/b023823.txt">Table of n, a(n) for n = 1..10000</a>
%t Table[Total[FactorInteger[Binomial[3 n, n + 1]][[All, 2]]], {n, 78}] (* _Ivan Neretin_, Nov 02 2017 *)
%K nonn
%O 1,2
%A _Clark Kimberling_
%E a(53) corrected by _Ivan Neretin_, Nov 02 2017
|