powered by
map(x, each)
## Not run: # map(1:10, 3) # # m <- matrix(1:12, ncol=4) # for(i in 1:12) # print(m[ring(i, 3), map(i, 4)]) # ## End(Not run)
Run the code above in your browser using DataLab