"tidy"(x, diag = attr(x, "Diag"), upper = attr(x, "Upper"), ...)
iris_dist <- dist(t(iris[, 1:4])) iris_dist tidy(iris_dist) tidy(iris_dist, upper = TRUE) tidy(iris_dist, diag = TRUE)
Run the code above in your browser using DataLab