plot.ashape3d: Plot the alpha-shape in 3D

In alphashape3d: Implementation of the 3D Alpha-Shape for the Reconstruction of 3D Sets from a Point Cloud

Plot the α-shape in 3D

Description

This function plots the α-shape in 3D using the package rgl.

Usage

## 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, ...)

Arguments

x	An object of class "ashape3d" that represents the α-shape of a given sample of points in the three-dimensional space, see ashape3d.
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 components_ashape3d.
indexAlpha	A single value or vector with the indexes of x$alpha that should be used for the computation, see Details.
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 material3d for details.

Details

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.

See Also

ashape3d, components_ashape3d

Examples

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)

alphashape3d documentation built on Feb. 16, 2023, 8:12 p.m.