update with links
update with links

davidmoten/rtree-3d,davidmoten/rtree-3d
#!/usr/bin/Rscript
#X11(type="Xlib")
library("plot3D")
for (i in 0:10 ) {
    mat <- read.csv(file = paste("../../../target/out",i,".txt", sep=""), header = FALSE)
    png(paste("../../../target/plot",i,".png",sep=""), height = 700, width =1000 )
    box3D(
      x0 = mat[,1], y0 = mat[,2], z0=mat[,3],
      x1 = mat[,4], y1 = mat[,5], z1=mat[,6],
      col = c("red", "lightblue", "orange"), 
      alpha = 0.3,
      border = "black", 
      lwd = 2)
    dev.off()
}
#!/usr/bin/Rscript
#X11(type="Xlib")
library("plot3D")
for (i in 0:10 ) {
    mat <- read.csv(file = paste("../../../target/out",i,".txt", sep=""), header = FALSE)
	png(paste("../../../target/plot",i,".png",sep=""), height = 700, width =1000 )
	box3D(
	  x0 = mat[,1], y0 = mat[,2], z0=mat[,3],
	  x1 = mat[,4], y1 = mat[,5], z1=mat[,6],
	  col = c("red", "lightblue", "orange"), 
	  alpha = 0.3,
	  border = "black", 
	  lwd = 2)
	dev.off()
}