tests/shader.R

library(rgl2gltf)
library(rgl)

gltf <- readGLB(system.file("glb/RiggedSimple.glb", package = "rgl2gltf"))

if (requireNamespace("manipulateWidget"))
  asRow(gltfWidget(gltf, method = "rigid"),
        gltfWidget(gltf, method = "shader"))

Try the rgl2gltf package in your browser

Any scripts or data that you put into this service are public.

rgl2gltf documentation built on April 3, 2025, 7:36 p.m.