powered by
makeblock3D(block1)
block1 = matrix(c(0,0,0, 1,0,0, 1,0.5,0, 0,0.5,0, 0,0,-2, 1,0,-2, 1,0.5,-2, 0,0.5,-2), byrow=TRUE, ncol=3) Bblock1 = makeblock3D(block1)
Run the code above in your browser using DataLab