if (FALSE) {
# repeat each row 4 times (for cluster computing)
Design <- createDesign(N = c(10, 20),
SD.equal = c(TRUE, FALSE))
Design4 <- expandDesign(Design, 4)
Design4
# repeat first two rows 2x and the rest 4 times (for cluster computing
# where first two conditions are faster to execute)
Design <- createDesign(SD.equal = c(TRUE, FALSE),
N = c(10, 100, 1000))
Design24 <- expandDesign(Design, c(2,2,rep(4, 4)))
Design24
}
Run the code above in your browser using DataLab