R/world.R

In pmur002/director: Automate video demonstrations

Defines functions directorWorld

Documented in directorWorld

## Define a "world" to shoot a video within

directorWorld <- function(..., class) {
    world <- list(...)
    class(world) <- c(class, "DirectorWorld")
    world
}

realWorld <- directorWorld(class="DirectorRealWorld")