Evaluate unsafe R expression inside Linux container

evaluate_inside_container.R

library("future")

## Launch Linux container rocker/r-base in background
cl <- makeClusterPSOCK("localhost",
        rscript = c("docker", "run", "--net=host", "rocker/r-base", "Rscript"),
        rscript_args = c("-e", shQuote("install.packages('future')")))

## Evaluate R expression inside container
f <- cluster({ some_unsafe_call() }, workers = cl)
v <- value(f)

## Alternatively, evaluate all future expressions inside the container
plan(cluster, workers = cl)

a %<-% { some_unsafe_call() }
b %<-% { another_unsafe_call() }