Examples for 'sfheaders::sfg_multilinestring'


sfg multilinestring

Aliases: sfg_multilinestring

Keywords:

### ** Examples


sfg_multilinestring( matrix( 1:24, ncol = 2 ) )
[[1]]
      [,1] [,2]
 [1,]    1   13
 [2,]    2   14
 [3,]    3   15
 [4,]    4   16
 [5,]    5   17
 [6,]    6   18
 [7,]    7   19
 [8,]    8   20
 [9,]    9   21
[10,]   10   22
[11,]   11   23
[12,]   12   24

attr(,"class")
[1] "XY"              "MULTILINESTRING" "sfg"            
sfg_multilinestring( matrix( 1:24, ncol = 3 ) )
[[1]]
     [,1] [,2] [,3]
[1,]    1    9   17
[2,]    2   10   18
[3,]    3   11   19
[4,]    4   12   20
[5,]    5   13   21
[6,]    6   14   22
[7,]    7   15   23
[8,]    8   16   24

attr(,"class")
[1] "XYZ"             "MULTILINESTRING" "sfg"            
sfg_multilinestring( matrix( 1:24, ncol = 4 ) )
[[1]]
     [,1] [,2] [,3] [,4]
[1,]    1    7   13   19
[2,]    2    8   14   20
[3,]    3    9   15   21
[4,]    4   10   16   22
[5,]    5   11   17   23
[6,]    6   12   18   24

attr(,"class")
[1] "XYZM"            "MULTILINESTRING" "sfg"            
## different lines
m <- cbind( matrix( 1:24, ncol = 2 ), c(rep(1, 6), rep(2, 6) ) )
sfg_multilinestring( obj = m, x = 1, y = 2, linestring_id = 3 )
[[1]]
     [,1] [,2]
[1,]    1   13
[2,]    2   14
[3,]    3   15
[4,]    4   16
[5,]    5   17
[6,]    6   18

[[2]]
     [,1] [,2]
[1,]    7   19
[2,]    8   20
[3,]    9   21
[4,]   10   22
[5,]   11   23
[6,]   12   24

attr(,"class")
[1] "XY"              "MULTILINESTRING" "sfg"            
## just specifying linestring_id will use all others as the geometries
sfg_multilinestring( obj = m, linestring_id = 3 )
[[1]]
     [,1] [,2]
[1,]    1   13
[2,]    2   14
[3,]    3   15
[4,]    4   16
[5,]    5   17
[6,]    6   18

[[2]]
     [,1] [,2]
[1,]    7   19
[2,]    8   20
[3,]    9   21
[4,]   10   22
[5,]   11   23
[6,]   12   24

attr(,"class")
[1] "XY"              "MULTILINESTRING" "sfg"            
df <- data.frame( x = 1:12, y = 1:12, z = 13:24, id = c(rep(1,6), rep(2,6)))
sfg_multilinestring( df, x = "x", y = "y" )
[[1]]
      [,1] [,2]
 [1,]    1    1
 [2,]    2    2
 [3,]    3    3
 [4,]    4    4
 [5,]    5    5
 [6,]    6    6
 [7,]    7    7
 [8,]    8    8
 [9,]    9    9
[10,]   10   10
[11,]   11   11
[12,]   12   12

attr(,"class")
[1] "XY"              "MULTILINESTRING" "sfg"            
sfg_multilinestring( df, x = "x", y = "y", linestring_id = "id" )
[[1]]
     [,1] [,2]
[1,]    1    1
[2,]    2    2
[3,]    3    3
[4,]    4    4
[5,]    5    5
[6,]    6    6

[[2]]
     [,1] [,2]
[1,]    7    7
[2,]    8    8
[3,]    9    9
[4,]   10   10
[5,]   11   11
[6,]   12   12

attr(,"class")
[1] "XY"              "MULTILINESTRING" "sfg"            
sfg_multilinestring( df, linestring_id = "id" )
[[1]]
     [,1] [,2] [,3]
[1,]    1    1   13
[2,]    2    2   14
[3,]    3    3   15
[4,]    4    4   16
[5,]    5    5   17
[6,]    6    6   18

[[2]]
     [,1] [,2] [,3]
[1,]    7    7   19
[2,]    8    8   20
[3,]    9    9   21
[4,]   10   10   22
[5,]   11   11   23
[6,]   12   12   24

attr(,"class")
[1] "XYZ"             "MULTILINESTRING" "sfg"            

[Package sfheaders version 0.4.4 Index]