View source: R/virtualMeshScan.r
getOuterViewpoints | R Documentation |
Get viewpoints on a sphere around a 3D mesh to be used with virtualMeshScan
getOuterViewpoints(
x,
n,
inflate = 1.5,
radius = NULL,
subdivision = 3,
PCA = FALSE
)
x |
triangular mesh of class 'mesh3d' |
n |
number of viewpoint to generate |
inflate |
factor for the size of the sphere: |
radius |
defines a fix radius for the sphere (overrides arg |
subdivision |
parameter passed to |
PCA |
logical: if TRUE, the sphere will be deformed to match the principle axes of the mesh. NOTE: this may result in the sphere not necessarily completely enclosing the mesh. |
a list containing
viewpoints |
n x 3 matrix containing viewpoints. |
sphere |
sphere from which the points are sampled |
radius |
radius of the sphere |
## Not run:
data(boneData)
vp <- getOuterViewpoints(skull_0144_ch_fe.mesh,n=100)
require(rgl)
shade3d(skull_0144_ch_fe.mesh,col="white")
spheres3d(vp$viewpoints)
wire3d(vp$sphere)
### Fit to principal axes
vppca <- getOuterViewpoints(skull_0144_ch_fe.mesh,n=100,PCA=TRUE,inflate=1.5)
require(rgl)
shade3d(skull_0144_ch_fe.mesh,col="white")
spheres3d(vppca$viewpoints)
wire3d(vppca$sphere)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.