 

The script below generates two side by side 3D histograms (OS - Windows,
RStudio v 98.507). 

I'm trying to avoid using a TIFF file editor to cleanup the figure, and
would like to create fully reproducible
output using R script. Help would be appreciated to: 

-reverse the direction of the arrow on the 'depth' axis.
-change the coloration of the legend, particularly in version2 (the
binomial example below), to match the output color or remove the legend.
-add two text lines for specific axis titles, such as "Depth" with "Low
High" beneath that.
-add 2 lines (or a square) on the "floor" of the version2 histogram, to
delineate the quadrant with highest Width and lowest Depth.
-add a text box and arrow pointing specific locations (mid-point on each
top 'wire' of the box frame). 

Thanks very much for your help on this. 

install.packages("plot3D")
require(plot3D)

par(mfrow=c(1,2))
par(mar=c(2.0,1.5,0.5,0.5)) 
par(oma=c(3,2,2,0)) 

hist3D(z=matrix(rnorm(100),10,10), expand=.5, alpha=.5, shade=.75,
theta=130, phi=20, cex=2, main="version1",
 xlab="Depth", ylab="Width",zlab="Height") 

hist3D(z=matrix(rbinom(100,10,.01),10,10), expand=.5, alpha=.5,
shade=.75,
theta=130, phi=20, main="version2",
 xlab="Depth", ylab="Width",zlab="Height")

 
	[[alternative HTML version deleted]]

