inst/scripts/bench_read_opus_parallel.R

devtools::load_all()
library("mirai")

daemons(n = 8L)

file <- opus_test_file()
files_1000 <- rep(file, 1000L)

data <- read_opus(dsn = files_1000, parallel = TRUE)

print(data)

cat("=== Read 1000 OPUS files ===\n")

Try the opusreader2 package in your browser

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

opusreader2 documentation built on Feb. 3, 2026, 5:07 p.m.