# NOT RUN {
x1 <- rnorm(100)
x2 <- rnorm(100)
y <- rnorm(100)
deltadmc.test(x1,x2,y, k=10, m=c(4:6), nu=0, rep=10, method="rhodcca")
deltadmc.test(x1,x2,y, k=10, m=c(4:6), nu=0, rep=10, method="dmca")
# }
Run the code above in your browser using DataLab