x <- 1:3
gm_coordinates( x )
m <- matrix(1:12, ncol = 3)
gm_coordinates( m )
l <- list(
matrix(1:12, ncol = 2 )
)
gm_coordinates( l )
l <- list(
matrix(1:12, ncol = 4 )
)
gm_coordinates( l )
l <- list(
list(
matrix(1:12, ncol = 2)
)
)
gm_coordinates( l )
l <- list(
list(
matrix(1:12, ncol = 2)
, matrix(1:4, ncol = 2)
)
)
gm_coordinates( l )
l <- list(
list(
matrix(1:12, ncol = 2)
, matrix(1:4, ncol = 2)
)
, 1:5
, 1:2
, matrix(1:9, ncol = 3)
)
gm_coordinates( l )
l <- list(
matrix(1:4, ncol = 2)
, list(
matrix(1:9, ncol = 3)
)
)
gm_coordinates( l )
l <- list(
list(
list(
matrix(1:12, ncol = 2)
)
)
, list(
list(
matrix(1:24, ncol = 2)
)
)
)
gm_coordinates( l )
l <- list(
list(
list(
matrix(1:12, ncol = 2)
)
)
, list(
list(
matrix(1:3, ncol = 3)
, matrix(1:24, ncol = 2)
)
)
)
gm_coordinates( l )
Run the code above in your browser using DataLab