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"))
dmurdoch/rgl2gltf documentation built on Nov. 19, 2024, 9:41 p.m.