* Encoding: UTF-8.
* pwr

BEGIN PROGRAM R. 

# pwr Regression

install.packages("pwr", repos="http://cran.rstudio.com")

library(pwr)

# R2=0.30
# u=3 (independent variables)
# n=v+u+1

pwr.f2.test(u=3, f2=0.30/(1-0.30), sig.level=0.05, power=0.80)


END PROGRAM.