This is some demo code for showing 3D data in R