library(pwr)
for (n in list(c(10, 10), c(12, 8), c(14, 6), c(16, 4), c(10, 20), c(10, 30), c(15, 15), c(10, 6), c(6, 6)))
  cat(sprintf("%2d + %2d (total %d): power %.2f\n", n[1], n[2], sum(n), pwr.t2n.test(n1 = n[1], n2 = n[2], d = 1.2, sig.level = 0.05)$power))
