Link two PointMap Cells (coordinates)

Link two cells on a PointMap using the point coordinates

Usage

# S4 method for class 'PointMap'
linkCoords(map, fromX, fromY, toX, toY, copyMap = TRUE)

Arguments

map

A PointMap

fromX

X coordinate of the first link point

fromY

Y coordinate of the first link point

toX

X coordinate of the second link point

toY

Y coordinate of the second link point

copyMap

Optional. Copy the internal sala map

Value

A new PointMap with linked points

Examples

mifFile <- system.file(
    "extdata", "testdata", "gallery",
    "gallery_lines.mif",
    package = "alcyon"
  )
  sfMap <- st_read(mifFile,
    geometry_column = 1L, quiet = TRUE
  )
  pointMap <- makeVGAPointMap(
    sfMap,
    gridSize = 0.04,
    fillX = 3.01,
    fillY = 6.7,
    maxVisibility = NA,
    boundaryGraph = FALSE,
    verbose = FALSE
  )
linkCoords(pointMap, 1.74, 6.7, 5.05, 5.24)
#> stars object with 2 dimensions and 7 attributes
#> attribute(s):
#>                           Min.      1st Qu.       Median         Mean
#> Ref                  0.0000000 1835064.7500 3.735590e+06 3.735590e+06
#> Connectivity         9.0000000     107.0000 1.790000e+02 2.048587e+02
#> Point First Moment   0.6780338      30.5024 7.556305e+01 1.097780e+02
#> Point Second Moment  0.0560000      12.0508 4.336080e+01 1.115533e+02
#> blocked              0.0000000       0.0000 0.000000e+00 1.989703e-01
#> contextfilled        0.0000000       0.0000 0.000000e+00 0.000000e+00
#> filled               0.0000000       0.0000 0.000000e+00 4.956522e-01
#>                           3rd Qu.         Max. NA's
#> Ref                  5636114.2500 7471179.0000    0
#> Connectivity             284.0000     624.0000 4408
#> Point First Moment       149.7499     619.3036 4408
#> Point Second Moment      105.2376    1218.8016 4408
#> blocked                    0.0000       1.0000    0
#> contextfilled              0.0000       0.0000    0
#> filled                     1.0000       1.0000    0
#> dimension(s):
#>   from  to offset delta x/y
#> x    1 115   0.62  0.04 [x]
#> y    1  76   7.82 -0.04 [y]