if (interactive()) {
# Only run examples in interactive R sessions
with(
daemons(2),
{
m1 <- mirai(Sys.getpid())
m2 <- mirai(Sys.getpid())
cat(call_mirai(m1)$data, call_mirai(m2)$data, "\n")
}
)
status()
}
Run the code above in your browser using DataLab