%I #84 Jan 04 2024 14:14:12
%S 0,0,0,1,0,1,2,1,1,2,4,2,2,2,4,5,4,3,3,4,5,7,5,5,4,5,5,7,8,7,6,6,6,6,
%T 7,8,11,8,8,7,8,7,8,8,11,13,11,9,9,9,9,9,9,11,13,15,13,12,10,11,10,11,
%U 10,12,13,15,16,15,14,13,12,12,12
%N T(n,k) is the total number of prime factors, counted with multiplicity, of k!*(n-k)!, for 0 <= k <= n. Triangle read by rows.
%C k!*(n-k)! is the denominator in binomial(n,k) = n!/(k!*(n-k)!) and all prime factors in the denominator cancel to leave an integer, so that T(n,k) = A022559(n) - A132896(n,k).
%H Dario T. de Castro, <a href="/A356718/b356718.txt">Rows n = 0..140 of triangle, flattened</a>
%F T(n,k) = bigomega(k!*(n-k)!), where 0 <= k <= n.
%F T(n,0) = T(n,n) = A022559(n).
%e Triangle begins:
%e n\k| 0 1 2 3 4 5 6 7
%e ---+--------------------------------------
%e 0 | 0
%e 1 | 0, 0;
%e 2 | 1, 0, 1;
%e 3 | 2, 1, 1, 2;
%e 4 | 4, 2, 2, 2, 4;
%e 5 | 5, 4, 3, 3, 4, 5;
%t T[n_,k_]:=PrimeOmega[Factorial[k]*Factorial[n-k]];
%t tab=Flatten[Table[T[n,k],{n,0,10},{k,0,n}]]
%Y Cf. A007318, A001222, A022559, A132896.
%K nonn,tabl,easy
%O 0,7
%A _Dario T. de Castro_, Aug 24 2022