# NOT RUN {
# }
# NOT RUN {
x <- searchCrossOverDesign(s=9, p=5, v=4, model=4)
plot(x)
# }
# NOT RUN {
x <- searchCrossOverDesign(s=9, p=5, v=4, model=4, n=c(50,10), jumps=c(10, 10))
plot(x, show.jumps=TRUE)
plot(x, type=2)
# }
Run the code above in your browser using DataLab