Sets attributes of a clipping plane
This is a function to produce actions in a web display. A
playwidget
or Shiny
input control (e.g. a sliderInput
control)
sets a value which controls attributes of one or more clipping
planes.
clipplaneControl(a = NULL, b = NULL, c = NULL, d = NULL, plane = 1, clipplaneids, ...)
a, b, c, d |
Parameter values for the clipping planes. |
plane |
Which plane in the clipplane object? |
clipplaneids |
The id of the clipplane object. |
... |
Other parameters passed to |
A list of class "rglControl"
of cleaned up parameter
values, to be used in an RGL widget.
Duncan Murdoch
open3d() saveopts <- options(rgl.useNULL = TRUE) xyz <- matrix(rnorm(300), ncol = 3) id <- plot3d(xyz, type="s", col = "blue", zlim = c(-3,3))["clipplanes"] dvals <- c(3, -3) widget <- rglwidget() %>% playwidget(clipplaneControl(d = dvals, clipplaneids = id), start = 0, stop = 1, step = 0.01, rate = 0.5) if (interactive() || in_pkgdown_example()) widget options(saveopts)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.