artificialBellResponse {sdmvspecies} | R Documentation |
artificialBellResponse
Description
artificial bell response method
Usage
artificialBellResponse(env.stack, config, stack = FALSE,
compose = "product", rescale = TRUE)
Arguments
env.stack |
a |
config |
config is a |
stack |
stack is an option that if you want not compose them togethor (result return as a |
compose |
the method compose the suitability together. Default is product |
rescale |
if |
Details
This method mainly implement artificial bell response method, more detail see references.
Value
rasterLayer
or rasterStack
if stack is set to TRUE
References
Varela, S., Anderson, R. P., García-Valdés, R., & Fernández-González, F. (2014). Environmental filters reduce the effects of sampling bias and improve predictions of ecological niche models. Ecography.
Examples
# load the sdmvspecies library
library("sdmvspecies")
library("raster")
# find package's location
package.dir <- system.file(package="sdmvspecies")
# let see where is our sdmvspecies is installed in
package.dir
# find env dir under the package's location
env.dir <- paste(package.dir, "/external/env/", sep="")
# let see env dir
env.dir
# get the environment raster file
file.name <- files <- c("bio1.bil", "bio12.bil", "bio7.bil", "bio5.bil")
files <- paste(env.dir, file.name, sep="")
# make raster stack
env.stack <- stack(files)
# config
config <- list(c("bio1",150, 50), c("bio12", 2000, 500), c("bio7", 400, 100), c("bio5", 300, 100))
# run pick mean
species.raster <- artificialBellResponse(env.stack, config)
# plot map
plot(species.raster)
# species distribution map
species.distribution.raster <- species.raster > 0.2
# plot map
plot(species.distribution.raster)