Analog similarity: best climate analogs within a geographic envelope
Source:R/analog_similarity.R
analog_similarity.RdFinds, for each focal location, the climate–nearest neighbor(s) in a reference dataset that satisfy a specified geographic distance threshold. Among other uses, this operation is often the first step in a traditional analog impact modeling (AIM) analysis.
Usage
analog_similarity(
x,
pool,
x_cov = NULL,
values = NULL,
coord_type = "auto",
max_geog,
max_clim = NULL,
k = 20,
index_res = "auto",
n_threads = NULL,
downsample = 1,
seed = NULL,
progress = FALSE
)Arguments
- x
Focal locations for which analogs will be found. Should be a matrix/data.frame with columns x, y, and climate variables, or a SpatRaster with climate variable layers.
- pool
The reference dataset to search for analogs. Either:
Matrix/data.frame with columns x, y, and climate variables, or SpatRaster with climate variable layers, OR
An
analog_indexobject created bybuild_analog_index()(for repeated queries).
- x_cov
Optional focal-specific covariance matrices for Mahalanobis distance calculations. Should be a matrix or data.frame with one row per focal location and one column per unique covariance component, or a SpatRaster with a layer for each component. For n climate variables, there are n*(n+1)/2 unique components, ordered as: variances first (diagonals), then covariances (upper triangle by row).
- values
Optional user-defined variables for each reference location in
poolto aggregate across selected analogs. Can be a numeric vector (single variable), matrix or data.frame with numeric columns (multiple variables), or a SpatRaster with one or more numeic layers. Must have exactly the same number of reference locations aspool.When provided, enables value-based aggregation stats
"sum","mean","weighted_sum", and"weighted_mean". For stat = NULL/"none" (pairs mode), value columns are included in output for each analog pair.- coord_type
Coordinate system type:
"auto"(default): Automatically detect from coordinate ranges."lonlat": Unprojected lon/lat coordinates (uses great-circle distance; assumesmax_geogis in km)."projected": Projected XY coordinates (uses planar distance; assumesmax_geogis in projection units).
- max_geog
Maximum geographic distance constraint (default: NULL = no geographic constraint). When specified, only reference locations within this distance are considered. Radius units should be specified in kilometers if
coord_type = "lonlat", or in projected coordinate units ifcoord_type = "projected".- max_clim
Maximum climate distance constraint (default: NULL = no climate constraint). Can be either:
A scalar: Euclidean radius in climate space (e.g., 0.5)
A vector: Per-variable absolute differences (length must equal number of climate variables)
Only reference locations within this climate distance are considered. When
x_covis provided, scalar thresholds are interpreted in Mahalanobis distance units.- k
Number of nearest analogs to return per focal location for kNN selection modes. Required when
selectis"knn_geog"or"knn_clim"; must beNULLforselect = "all".- index_res
Tuning parameter giving the number of bins per dimension of the internally-used lattice search index. Either:
A positive integer.
"auto"(the default): Automatically tune the index resolution by optimizing compute time on a subsample of focal points. If focal has relatively few rows, auto-tuning is skipped and a default resolution of 16 is used.
Ignored if
poolis ananalog_index(uses index's resolution).- n_threads
Optional integer number of threads to use for the computation. If
NULL(default), the global RcppParallel setting is used (seeRcppParallel::setThreadOptions).- downsample
Optional downsampling rate (0-1) for the reference pool, indicating the proportion of points to retain. Values < 1 reduce memory and improve speed at some cost to precision. Default is 1.0 (no downsampling). Ignored if
poolis a pre-built index.- seed
Optional random seed for reproducible downsampling. If
NULL(default), uses current R random state. Ignored ifpoolis a pre-built index ordownsample = 1.- progress
Logical; if
TRUE, display a progress bar during computation. Progress tracking works by splitting the focal dataset into chunks and processing them sequentially. Useful for large datasets. Default isFALSE.
Value
Return type depends on input format and query mode.
Returns a data.frame, unless x is a SpatRaster and results have exactly one record per
input cell (aggregation mode, or pairwise with k = 1), in which case returns a
SpatRaster with one layer per output variable.
Pairwise mode (stat = NULL or "none") returns one row per focal-analog pair,
with the following variables:
index,x,y: Focal location (1-based index and coordinates) corresponding to inputxanalog_index,analog_x,analog_y: Analog location corresponding to inputpoolclim_dist: Climate distance (Euclidean or Mahalanobis)geog_dist: Geographic distance (km for lonlat, projection units otherwise)Value columns (if
valuesprovided): one per variable
Aggregation mode (one or more stat values) returns one row per focal location,
with the following variables:
index,x,y: Focal locationOne column per requested statistic. For
statwith singlevaluesvariable: column named by stat (e.g.,sum,mean). Forstatwith multiplevaluesvariables: columns named{stat}_{varname}(e.g.,sum_biomass,mean_richness)
All results include metadata attributes (select, stat, weight, etc.).
Use analog_summary() to view a formatted summary.
Details
This function is a wrapper that calls analog_search() using select = "knn_clim".
For each focal location, analog_similarity():
Identifies all reference points within
max_geogkm (and optional climate filter).Selects the
kclosest in climate distance.
This is the natural "inverse" of analog_velocity: instead of finding
where the focal climate moves geographically, it finds the closest climatically
similar conditions that are geographically reachable.
See also
analog_search() for the underlying flexible analog search function;
tiled_analog_search() for memory-safe searches on large raster datasets.
Examples
if (FALSE) { # \dontrun{
# One-shot query
im <- analog_similarity(
x = clim$clim1,
pool = clim$clim2,
max_geog = 100,
k = 20
)
# With pre-built index (for repeated queries)
index <- build_analog_index(clim$clim2)
i1 <- analog_similarity(x = sites1, pool = index, max_geog = 100, k = 20)
i2 <- analog_similarity(x = sites2, pool = index, max_geog = 50, k = 10)
} # }