inst/testme/test-demo.R

In future.mirai: A 'Future' API for Parallel Processing using 'mirai'

#' @tags detritus-files
#' @tags mirai_multisession

library(future.mirai)

options(future.demo.mandelbrot.nrow = 2L)
options(future.demo.mandelbrot.resolution = 50L)
options(future.demo.mandelbrot.delay = FALSE)

message("*** Demos ...")

message("*** Mandelbrot demo of the 'future' package ...")

plan(mirai_multisession, workers = 2)
demo("mandelbrot", package = "future", ask = FALSE)
plan(sequential)

message("*** Demos ... DONE")