Get viewpoints on a sphere around a 3D mesh
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 |
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) ## End(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) ## End(Not run)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.