Internal function
Examples
vect2diss(rnorm(10))
#> [,1] [,2] [,3] [,4] [,5]
#> [1,] 0.0000000 -1.6630567 -0.7206361 -1.5182012 0.2598215
#> [2,] -1.6630567 0.0000000 0.2500805 0.4470079 1.0179657
#> [3,] -0.7206361 0.2500805 0.0000000 0.9003209 0.6142713
#> [4,] -1.5182012 0.4470079 0.9003209 0.0000000 -0.2394080
#> [5,] 0.2598215 1.0179657 0.6142713 -0.2394080 0.0000000