powered by
indexToCoord(x, idx) "indexToCoord"(x, idx) "indexToCoord"(x, idx)
bvol <- BrainVolume(array(0, c(10,10,10)), BrainSpace(c(10,10,10), c(1,1,1))) idx <- 1:10 g <- indexToCoord(bvol, idx) idx2 <- coordToIndex(bvol, g) all.equal(idx, idx2)
Run the code above in your browser using DataLab