Plot a bounded Voronoï 3D cell with **rgl**.

## Usage

```
plotBoundedCell3D(
cell,
edgesAsTubes = FALSE,
tubeRadius,
tubeColor,
facetsColor = NA,
alpha = 1,
check.bounded = TRUE
)
```

## Arguments

- cell
a bounded Voronoï 3D cell

- edgesAsTubes
Boolean, whether to plot edges as tubes or as lines

- tubeRadius
radius of the tubes if

`edgesAsTubes = TRUE`

- tubeColor
color of the tubes if

`edgesAsTubes = TRUE`

- facetsColor
color of the facets;

`NA`

for no color- alpha
opacity of the facets, a number between 0 and 1

- check.bounded
Boolean, whether to check that the cell is bounded; set to

`FALSE`

for a small speed gain if you know that the cell is bounded

## Examples

```
library(tessellation)
d <- delaunay(centricCuboctahedron())
v <- voronoi(d)
#> Voronoï diagram with one bounded cell.
cell13 <- v[[13]]
isBoundedCell(cell13) # TRUE
#> [1] TRUE
library(rgl)
open3d(windowRect = c(50, 50, 562, 562))
plotBoundedCell3D(
cell13, edgesAsTubes = TRUE, tubeRadius = 0.03, tubeColor = "yellow",
facetsColor = "navy", alpha = 0.7
)
```