## 1000 variables, hence 1000 F-tests will be performed
x = matrix( rnorm(300 * 1000), ncol = 1000 )
## 300 observations in total
ina = rbinom(300, 3, 0.6) + 1 ## independent samples t-test
system.time( ftests(x, ina) )
system.time( anovas(x, ina) )
Run the code above in your browser using DataLab