# NOT RUN {
xprod(1:3, 4:6)
# This works for an dimension
xprod(c(0,1)) # 2d
xprod(c(1,0,0), c(0,1,0)) # 3d
xprod(c(1,1,1), c(0,1,0)) # 3d
xprod(c(1,0,0,0), c(0,1,0,0), c(0,0,1,0)) # 4d
# }
Run the code above in your browser using DataLab