Plot a 3D Delaunay tessellation with rgl.
Usage
plotDelaunay3D(
tessellation,
color = "distinct",
hue = "random",
luminosity = "light",
alpha = 0.3,
exteriorEdgesAsTubes = FALSE,
tubeRadius,
tubeColor
)
Arguments
- tessellation
the output of
delaunay
- color
controls the filling colors of the tetrahedra, either
FALSE
for no color,"random"
to userandomColor
, or"distinct"
to usedistinctColorPalette
- hue, luminosity
if
color = "random"
, these arguments are passed torandomColor
- alpha
opacity, number between 0 and 1
- exteriorEdgesAsTubes
Boolean, whether to plot the exterior edges as tubes; in order to use this feature, you need to set
exteriorEdges = TRUE
in thedelaunay
function- tubeRadius
if
exteriorEdgesAsTubes = TRUE
, the radius of the tubes- tubeColor
if
exteriorEdgesAsTubes = TRUE
, the color of the tubes
Examples
library(tessellation)
pts <- rbind(
c(-5, -5, 16),
c(-5, 8, 3),
c(4, -1, 3),
c(4, -5, 7),
c(4, -1, -10),
c(4, -5, -10),
c(-5, 8, -10),
c(-5, -5, -10)
)
tess <- delaunay(pts)
library(rgl)
open3d(windowRect = c(50, 50, 562, 562))
plotDelaunay3D(tess)
open3d(windowRect = c(50, 50, 562, 562))
plotDelaunay3D(
tess, exteriorEdgesAsTubes = TRUE, tubeRadius = 0.3, tubeColor = "yellow"
)
#> Warning: You didn't set the option `exteriorEdges=TRUE` in the `delaunay` function, therefore the option `exteriorEdgesAsTubes` is ignored.