# NOT RUN {
if (matlabr::have_matlab()) {
d = rep(25, 3)
arr = array(rbinom(prod(d), size = 1, prob = 0.5), dim = d)
nim = oro.nifti::nifti(arr)
res = spm_bwlabel(nim, k = 1, binary = FALSE, install_dir = tempdir())
tab = table(c(res))
tab
out_arr = as(res, "array")
}
# }
Run the code above in your browser using DataLab