将两个向量之间的函数投影到 R 中的数据框中

Question

在R中两个向量X,Y之间的距离系数可以用dcor(X,Y)包的energy函数来计算。我有一个像这样的矩阵Z

library(energy)
Z <- data.frame(c(0.2, 3, 0.01, 3.4, 6),c(2.2, 3.5, 0.5, 0.3, 7.0), c(4.7, 0.003, 1.4, 0, 0.6))
colnames(Z) <- c(paste0("Z",1:ncol(Z)))

我想为所有组合创建距离相关矩阵。如何创建执行此计算的函数？最后的结果一定是这样的

     Z1     Z2     Z3
Z1   1      0.76   0.76
Z2   0.76   1      0.48
Z3   0.76   0.48   1