The Family-Wise Error Rate 1

Sign in to test your solution.
fund.mini <- Fund[, 1:5] fund.pvalue <- rep(0, 5) for (i in 1:5) fund.pvalue[i] <- t.test(fund.mini[, i], mu = 0)$p.value p.adjust(...) MC1 <-