Media_pvalue {MediaK}

functions to calculate pvalue

Description

This function is created to calculate p values about MeDiA_k

Usage

Media_pvalue(iTest,jTest,times,selectvec)

Arguments

iTest

a numeric matrix

jTest

a numeric matrix which has the same rows as iTest

selectvec

an integer vector which contains a series of K values you want to get

times

an integer indicates permutation times

Value

Media_pvalue(iTest,jTest,times,selectvec) return a numeric vectors contains p values based on the selectvec(K value you want to select)

Examples

iTest <- matrix(rnorm(1000),100)
jTest<- matrix(rnorm(200),100)
times<- 100
selectvec <- c(1:10)
Media_pvalue(iTest,jTest,times,selectvec)