# NOT RUN {
## Not run
## screen_r(r_vec = c(-.3, .5, 1.1), n_vec = c(100, 100, 100))
## screen_r(r_vec = c(-.3, .5, .8), n_vec = c(Inf, 100, 100))
## screen_r(r_vec = c(-.3, .5, .8), n_vec = c(2, 100, 100))
# }
Run the code above in your browser using DataLab