Suppse of I have a maximum dist object as follow
coords = matrix(c(35.0456, -85.2672, 35.1174, -89.9711,45.9728, -83.9422),nrow = 3, ncol=2) dat = dist(coords