inst/slowTests/demos.R

library(rgl)

# regression :  this failed for headless tests
par3d(userMatrix = diag(4))

if (!rgl.useNULL())
  for(demo in demo(package="rgl")$results[,"Item"]) 
    if (!(demo %in% c("rgl", "lsystem", "rglExamples", 
  	            	    "shinyDemo", "simpleShinyRgl",
  	            	    "shinyMouse")))
      demo(demo, package="rgl", character.only=TRUE)

Try the rgl package in your browser

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

rgl documentation built on Feb. 1, 2021, 3:01 a.m.