rangeSample | R Documentation |
Get a sample of XY locations from a single raster meeting a certain condition
rangeSample(z, n, minval = NULL, maxval = NULL, replace = FALSE)
z |
A SpatRaster or RasterLayer object |
n |
Numeric. How many samples to draw |
minval |
Numeric. Select all cells larger than this value |
maxval |
Numeric. Select all cells lesser than thsi value |
replace |
Logical. Should samples be taken with replacement? |
# Generate a DEM
n <- 5
dem <- expand.grid(list(x = 1:(n * 100),
y = 1:(n * 100))) / 100
dem <- as.data.table(dem)
dem[, z := 250 * exp(-(x - n/2)^2) +
250 * exp(-(y - n/2)^2)]
dem <- rast(dem)
ext(dem) <- c(10000, 20000, 30000, 40000)
crs(dem) <- "+proj=lcc +lat_1=48 +lat_2=33 +lon_0=-100 +datum=WGS84"
# Take a sample of 10 values between 150 and 200
points <- rangeSample(dem, 10, minval = 150, maxval = 200)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.