OFFSET
1,1
COMMENTS
FORMULA
T(n, k) = binomial(pi(n), k)*2^(n-pi(n)), with pi = A000720.
MATHEMATICA
T[n_, k_] := Binomial[PrimePi[n], k] 2^(n - PrimePi[n]);
Table[T[n, k], {n, 1, 12}, {k, 0, n-1}] // Flatten (* Jean-François Alcover, Nov 04 2020 *)
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Reinhard Zumkeller, Nov 12 2003
STATUS
approved