amt (version 0.0.7)

random_points: Generate random points

Description

Functions to generate random points within an animals home range. This is usually the first step for investigating habitat selection via Resource Selection Functions (RSF).

Usage

random_points(x, ...)
# S3 method for mcp
random_points(x, n = 100, type = "random", ...)
# S3 method for sf
random_points(x, n = 100, type = "random", ...)
# S3 method for SpatialPolygons
random_points(x, n = 100, type = "random",
  ...)
# S3 method for track_xy
random_points(x, level = 1, hr = "mcp",
  factor = 10, type = "random", ...)

Arguments

x

[track_xy, track_xyt] A track created with make_track.

...

[any] None implemented.

n

[integer(1)] The number of random points.

type

[character(1)] Argument passed to sp::spsample type. The default is random.

level

[numeric(1)] Home-range level of the minimum convex polygon, used for generating the background samples.

hr

[character(1)] The home range estimator to be used. Currently only MCP is implemented.

factor

[numeric(1)] Determines the number of random points that are generated. If factor == 1 the number of presence points is equal to the number of observed points.

Examples

# NOT RUN {
data(deer)

# track_xyt ---------------------------------------------------------------
# Default settings
rp1 <- random_points(deer)

# }
# NOT RUN {
plot(rp1)
# }
# NOT RUN {
trast <- raster(bbox(deer, buffer = 5000), res = 30)
rp3 <- random_points(deer, hr = "kde", trast = trast) # we need a larger template raster

 
# }
# NOT RUN {
plot(rp3)
# }
# NOT RUN {

# Only one random point for each observed point
rp <- random_points(deer, factor = 1)
# }
# NOT RUN {
plot(rp)
# }
# NOT RUN {
# Within a home range -----------------------------------------------------
hr <- hr_mcp(deer, level = 1)

# 100 random point within the home range
rp <- random_points(hr, n = 100)
# }
# NOT RUN {
plot(rp)
# }
# NOT RUN {
# 100 regular point within the home range
rp <- random_points(hr, n = 100, type = "regular")
# }
# NOT RUN {
plot(rp)
# }
# NOT RUN {
# 100 hexagonal point within the home range
rp <- random_points(hr, n = 100, type = "hexagonal")
# }
# NOT RUN {
plot(rp)
# }
# NOT RUN {
# }