PERF: rvcoef subtlety

ANTsX · Nov 3, 2024 · c60cbc8 · c60cbc8
1 parent e2410ac
commit c60cbc8
Show file tree

Hide file tree

Showing 2 changed files with 53 additions and 37 deletions.
diff --git a/R/multiscaleSVDxpts.R b/R/multiscaleSVDxpts.R
@@ -4415,7 +4415,7 @@ rvcoef <- function(X, Y) {
   C <- t(X_norm) %*% Y_norm
 
   # Compute SVD
-  svd_C <- ba_svd(C)
+  svd_C <- ba_svd(C, dividebymax=TRUE )
 
   # Compute RV coefficient
   sigma_sq <- sum(svd_C$d^2)

diff --git a/docs/reference/antsrMetricSetRadius.html b/docs/reference/antsrMetricSetRadius.html