powered by
permute_axes(im, perm)
im <- array(0,c(10,30,40,3)) %>% as.cimg permute_axes(im,"zxyc")
Run the code above in your browser using DataLab