library(cluster)
data(ligophorus_tpsdata)
#There are 11 landmarks for the ventral and dorsal anchors,
#yielding 110 pairwise Euclidean distances
#The indices for the pairwise Euclidean distances map to the upper triangle
#of the pairwise distance matrix by row
pwdist(ligophorus_tpsdata$bantingensis[[1]],average=FALSE)
Run the code above in your browser using DataLab