# NOT RUN {
path.output.perm <- tempdir()
path.input.perm <-path.output.perm
cutoff.1 <- FDR.permutation(x=modelY_Hopx,Npermut=6,start.counter=1,
path.output=path.output.perm,path.input=path.input.perm,nbcpu=3)
cutoff.2 <- FDR.permutation(x=modelY_Hopx,Npermut=6,start.counter=7,
path.output=path.output.perm,path.input=path.input.perm,nbcpu=3)
namePermut <- "Permut-Example-GUESS-Y-Hopx"
cutoff.pool <-Analysis.permutation(modelY_Hopx,namePermut=namePermut,
Npermut=9,threshold=0.05,path.output=path.output.perm,number.cutoff=10)
# }
Run the code above in your browser using DataLab