## Not run:
#
# # object returned from mrss function
# design1 <- mrss.bira2r1(rho2=.35, omega2=.10, n=83)
# # convert the object into an object returned from mdes function
# design2 <- mrss.to.mdes(design1)
#
# ## End(Not run)
Run the code above in your browser using DataLab