View source: R/MK_Connect_grid.R
MK_Connect_grid | R Documentation |
Use the function to compute the Protected Connected (ProtConn), EC, PC or IIC indexes in a regular grid.
MK_Connect_grid(
nodes,
area_unit = "ha",
region = NULL,
grid = list(hexagonal = TRUE, cellsize = NULL, grid_boundary = FALSE, clip = FALSE,
tolerance = NULL),
protconn = TRUE,
distance_threshold = NULL,
probability = NULL,
transboundary = NULL,
distance = list(type = "centroid"),
intern = TRUE,
parallel = NULL
)
nodes |
|
area_unit |
|
region |
object of class |
grid |
|
protconn |
|
distance_threshold |
A |
probability |
A |
transboundary |
|
distance |
A |
intern |
|
parallel |
|
Matt Strimas-Mackey. http://strimas.com/spatial/hexagonal-grids/.
Saura, S., Bastin, L., Battistella, L., Mandrici, A., & Dubois, G. (2017). Protected areas in the
world's ecoregions: How well connected are they? Ecological Indicators, 76, 144–158.
Saura, S. & Torne, J. (2012). Conefor 2.6. Universidad Politecnica de Madrid. Available
at www.conefor.org.
Pascual-Hortal, L. & Saura, S. (2006). Comparison and development of new graph-based landscape
connectivity indices: towards the priorization of habitat patches and corridors for conservation.
Landscape Ecology, 21(7): 959-967.
Saura, S. & Pascual-Hortal, L. (2007). A new habitat availability index to integrate connectivity
in landscape conservation planning: comparison with existing indices and application to a case study.
Landscape and Urban Planning, 83(2-3): 91-103.
## Not run:
library(Makurhini)
library(sf)
load(system.file("extdata", "Protected_areas.rda",
package = "Makurhini", mustWork = TRUE))
data("Ecoregions", package = "Makurhini")
ecoregion <- Ecoregions[1,]
plot(st_geometry(ecoregion), col = "#7E6A9F")
#ProtConn
hexagons_priority <- MK_Connect_grid(nodes = Protected_areas,
region = ecoregion,
area_unit = "ha",
grid = list(hexagonal = TRUE,
cellsize = unit_convert(5000, "km2", "m2")),
protconn = TRUE,
distance_threshold = 3000,
probability = 0.5,
transboundary = 6000,
distance = list(type = "centroid"),
intern = TRUE,
parallel = NULL)
hexagons_priority
plot(st_geometry(ecoregion), col = "#7E6A9F")
plot(hexagons_priority["ProtConn"], add = TRUE)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.