omitdiag function

Replace the diagonal in a distance matrix with missing values