Plot the α-shape in 3D
This function plots the α-shape in 3D using the package
rgl
.
## S3 method for class 'ashape3d' plot(x, clear = TRUE, col = c(2, 2, 2), byComponents = FALSE, indexAlpha = 1, transparency = 1, walpha = FALSE, triangles = TRUE, edges = TRUE, vertices = TRUE, ...)
x |
An object of class |
clear |
Logical, specifying whether the current rgl device should be cleared. |
col |
A vector of length three specifying the colors of the triangles, edges and vertices composing the α-shape, respectively. |
byComponents |
Logical, if TRUE the connected components of the
α-shape are represented in different colors, see
|
indexAlpha |
A single value or vector with the indexes of
|
transparency |
The coefficient of transparency, from 0 (transparent) to 1 (opaque), used to plot the α-shape. |
walpha |
Logical, if TRUE the value of α is displayed in the rgl device. |
triangles |
Logical, if TRUE triangles are plotted. |
edges |
Logical, if TRUE edges are plotted. |
vertices |
Logical, if TRUE vertices are plotted. |
... |
Material properties. See |
The function plot.ashape3d
opens a rgl device for each value of
α in x$alpha[indexAlpha]
. Device information is displayed
in the console.
If indexAlpha="all"
or indexAlpha="ALL"
then the function
represents the α-shape for all values of α in
as3d$alpha
.
T1 <- rtorus(1000, 0.5, 2) T2 <- rtorus(1000, 0.5, 2, ct = c(2, 0, 0), rotx = pi/2) x <- rbind(T1, T2) alpha <- c(0.15, 0.25, 1) ashape3d.obj <- ashape3d(x, alpha = alpha) # Plot the alpha-shape for all values of alpha plot(ashape3d.obj, indexAlpha = "all") # Plot the connected components of the alpha-shape for alpha=0.25 plot(ashape3d.obj, byComponents = TRUE, indexAlpha = 2)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.