Internal function
Examples
vect2diss_hop(rnorm(10))
#> [,1] [,2] [,3] [,4] [,5]
#> [1,] 0.00000000 -1.8031493 0.01342568 -0.06732869 1.6787554
#> [2,] -1.80314928 0.0000000 -0.25145721 -0.85524888 0.0293183
#> [3,] 0.01342568 -0.2514572 0.00000000 -0.35208949 -1.3680452
#> [4,] -0.06732869 -0.8552489 -0.35208949 0.00000000 0.4846134
#> [5,] 1.67875542 0.0293183 -1.36804516 0.48461339 0.0000000