27.8 Power for an anova

27.8.1 (Multiple groups, continous outcomes)

pwr.anova.test(
    k = 2, f = var(c(950,1000))/50^2,
    sig.level = .05, power = .8, n=NULL)

## 
##      Balanced one-way analysis of variance power calculation 
## 
##               k = 2
##               n = 17
##               f = 0.5
##       sig.level = 0.05
##           power = 0.8
## 
## NOTE: n is number in each group