a <- randomGrid()
b <- randomGrid()
b@elements <- rev(a@elements) # reverse elements
bindConstructs(a, b)
bindConstructs(a, b, a)
# using lists of repgrid objects
bindConstructs(a, list(a, b))
Run the code above in your browser using DataLab