Internal function where there are multiple shrinkage targets.
getTgroup
nbTestSH.
nbTestSH
data("countsTable") conds <- c("A", "B") resSH <- nbTestSH( countsTable, conds, "A", "B", numPart=10)