I am making an rgl-based 3d plot. It works fine, except when I try to
remove axis value labels and tick marks with axes3d(labels=FALSE,
ticks=FALSE):
---------------------------
rgl.open()
offset <- 50
par3d(windowRect=c(offset, offset, 1280+offset, 1280+offset))
rm(offset)
rgl.clear()
rgl.viewpoint(theta=thetaStart, phi=30, fov=30, zoom=1)
spheres3d(df$PC1, df$PC2, df$PC3, radius=featureRadius, color=df$rColor,
alpha=featureTransparency, shininess=featureShininess)
aspect3d(1, 1, 1)
/* ------ */
axes3d(col='black', box=FALSE, labels=FALSE, ticks=FALSE)
/* ------ */
title3d("", "", "PCoA1", "PCoA2",
"PCoA3", col='black', line=1)
texts3d(df$PC1, df$PC2, df$PC3, text=df$ctName, color="blue",
adj=c(0,0))
bg3d("white")
rgl.clear(type='lights')
rgl.light(-45, 20, ambient='black', diffuse='#dddddd',
specular='white')
rgl.light(60, 30, ambient='#dddddd', diffuse='#dddddd',
specular='black')
filename <- paste("results/PCoA.labeled.pdf", sep="")
rgl.postscript(filename, fmt="pdf")
---------------------------
When I run this code, these flags are ignored and I still get axis labels
and tick marks. What am I misunderstanding about the documentation?
Thanks,
Alex
[[alternative HTML version deleted]]