Control RGL widget like par3dinterp()
This control works with playwidget
to
change settings in a WebGL display in the same way
as par3dinterp
does within R.
par3dinterpControl(fn, from, to, steps, subscene = NULL, omitConstant = TRUE, ...)
fn |
A function returned from |
from, to, steps |
Values where |
subscene |
Which subscene's properties should be modified? |
omitConstant |
If |
... |
Additional parameters which will be passed
to |
par3dinterpSetter
sets parameters corresponding to values produced by the result of
par3dinterp
.
Returns controller data in a list of class "rglControl".
Duncan Murdoch
example(plot3d) M <- r3dDefaults$userMatrix fn <- par3dinterp(times = (0:2)*0.75, userMatrix = list(M, rotate3d(M, pi/2, 1, 0, 0), rotate3d(M, pi/2, 0, 1, 0)), scale = c(0.5, 1, 2)) control <- par3dinterpControl(fn, 0, 3, steps = 15) control if (interactive() || in_pkgdown_example()) rglwidget(width = 500, height = 250) %>% playwidget(control, step = 0.01, loop = TRUE, rate = 0.5)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.