Description Usage Arguments Examples
Triangular mesh of sphere
1 | my.sphere.tri.mesh(n.psi = 30)
|
n.psi, |
integer to set fineness of mesh |
1 2 3 4 5 | n.psi <- 25
sp.mesh <- my.sphere.tri.mesh(n.psi)
library(rgl)
plot3d(sp.mesh$xyz)
segments3d(sp.mesh$xyz[c(t(sp.mesh$edge)),])
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.