## Not run:
# rglwidget(elementId = "thewidget")
# elementId2Prefix("thewidget", "theprefix")
# subsetSlider(subsets = as.list(1:5),
# prefixes = "theprefix", subscenes = 1)
# ## End(Not run)
Run the code above in your browser using DataLab