# NOT RUN {
set.seed(12345)
## Power calculation against bivariate (p=2) independent Beta(1, 1) distribution ##
## at sample size n=50 at one-sided alpha = 0.05 ##
power.mswR(a = 0.05, n = 50, p = 2, B = 100, FUN=IMMV, D1=runif)
# }
Run the code above in your browser using DataLab