powered by
Media_pvalue(iTest,jTest,times,selectvec)
iTest <- matrix(rnorm(1000),100) jTest<- matrix(rnorm(200),100) times<- 100 selectvec <- c(1:10) Media_pvalue(iTest,jTest,times,selectvec)
Run the code above in your browser using DataLab