Morpho (version 2.6)

getOuterViewpoints: Get viewpoints on a sphere around a 3D mesh

Description

Get viewpoints on a sphere around a 3D mesh to be used with virtualMeshScan

Usage

getOuterViewpoints(x, n, inflate = 1.5, radius = NULL, subdivision = 3,
  PCA = FALSE)

Arguments

x

triangular mesh of class 'mesh3d'

n

number of viewpoint to generate

inflate

factor for the size of the sphere: inflate=1 means that the sphere around the object just touches the point farthest away from the mesh's centroid.

radius

defines a fix radius for the sphere (overrides arg inflate).

subdivision

parameter passed to vcgSphere

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.

Value

a list containing

viewpoints

n x 3 matrix containing viewpoints.

sphere

sphere from which the points are sampled

radius

radius of the sphere

Examples

# NOT RUN {
data(boneData)
vp <- getOuterViewpoints(skull_0144_ch_fe.mesh,n=100)
# }
# NOT RUN {
require(rgl)
shade3d(skull_0144_ch_fe.mesh,col="white")
spheres3d(vp$viewpoints)
wire3d(vp$sphere)
# }
# NOT RUN {
### Fit to principal axes
vppca <- getOuterViewpoints(skull_0144_ch_fe.mesh,n=100,PCA=TRUE,inflate=1.5)
# }
# NOT RUN {
require(rgl)
shade3d(skull_0144_ch_fe.mesh,col="white")
spheres3d(vppca$viewpoints)
wire3d(vppca$sphere)
# }