ex02

ex_02_sesoi.R

+list.of.packages <- c("pwr")
+new.packages <- list.of.packages[!(list.of.packages %in% installed.packages()[,"Package"])]
+if(length(new.packages)) install.packages(new.packages)
+
+###############################################
+previous.sample <- 
+alpha.level <-
+beta.level <- 
+
+###############################################
+# find the SESOI 
+# ask for help using ??pwr
+
+############################################
+# run a power analysis using the SESOI 
+# ask for help using ??pwr