morie_spatial_classical_mds_cpp — morie_spatial_classical_mds

A step of the RcppExports implementation. Called by morie_spatial_voting_classical_mds. See the file header for the source the module follows.

Arguments

D: Passed to .Call.
n_dims: Passed to .Call.

Value

The value of .Call.

Examples

D <- as.matrix(dist(cbind(c(0, 1, 0, 1), c(0, 0, 1, 1))))
morie_spatial_classical_mds_cpp(D, 2L)
#> $coordinates
#>               [,1]          [,2]
#> [1,]  7.071068e-01  4.598694e-17
#> [2,] -2.375321e-17 -7.071068e-01
#> [3,]  0.000000e+00  7.071068e-01
#> [4,] -7.071068e-01  0.000000e+00
#> 
#> $eigenvalues
#> [1] 1 1
#> 
#> $stress
#> [1] 1.241267e-16
#> 
#> $fit
#> [1] 1
#> 
#> $B_matrix
#>               [,1]          [,2]          [,3]          [,4]
#> [1,]  5.000000e-01  8.326673e-17  9.714451e-17 -5.000000e-01
#> [2,]  8.326673e-17  5.000000e-01 -5.000000e-01  9.714451e-17
#> [3,]  9.714451e-17 -5.000000e-01  5.000000e-01  9.714451e-17
#> [4,] -5.000000e-01  1.110223e-16  1.110223e-16  5.000000e-01
#>