| is_metric {rdist} | R Documentation |
Does the distance matric come from a metric
is_distance_matrix(mat, tolerance = .Machine$double.eps^0.5) triangle_inequality(mat, tolerance = .Machine$double.eps^0.5)
mat |
The matrix to evaluate |
tolerance |
Differences smaller than tolerance are not reported. |
data <- matrix(rnorm(20), ncol = 2) dm <- pdist(data) is_distance_matrix(dm) triangle_inequality(dm) dm[1, 2] <- 1.1 * dm[1, 2] is_distance_matrix(dm)