# NOT RUN {
  a <- seq_array_ind(1:3,col_major = TRUE)
#> a
#
#       [,1] [,2] [,3]
# [1,]    1    1    1
# [2,]    1    2    1
# [3,]    1    1    2
# [4,]    1    2    2
# [5,]    1    1    3
# [6,]    1    2    3
b<-seq_array_ind(1:3,col_major = FALSE)
# }
Run the code above in your browser using DataLab