w <- boxx(c(0,10), c(0,10), c(0,10))
# add a margin of size 1 on both sides in all three dimensions
box11 <- grow.boxx(w, 1)
# add margin of size 2 to the three left end points
# and margin of size 3 to the right end points.
v <- grow.boxx(w, c(2,2,2), c(3,3,3))
Run the code above in your browser using DataLab