update overwrites

ANTsX · May 19, 2024 · 5951c0a · 5951c0a
1 parent eb1c0ee
commit 5951c0a
Show file tree

Hide file tree

Showing 7 changed files with 8 additions and 8 deletions.
diff --git a/R/fitBsplineDisplacementField.R b/R/fitBsplineDisplacementField.R
@@ -149,7 +149,7 @@ fitBsplineDisplacementField <- function(
     numberOfControlPoints <- rep(numberOfControlPoints, dimensionality)
   }
 
-  bsplineField <- ANTsRCore::fitBsplineDisplacementField(
+  bsplineField <- ANTsRCore::fitBsplineDisplacementFieldR(
     dimensionality,
     displacementField, displacementWeightImage,
     displacementOrigins, displacements, displacementWeights,

diff --git a/R/fitBsplineObjectToScatteredData.R b/R/fitBsplineObjectToScatteredData.R
@@ -148,7 +148,7 @@ fitBsplineObjectToScatteredData <- function(
     stop("Error:  the number of weights is not the same as the number of points.")
   }
 
-  bsplineObject <- ANTsRCore::fitBsplineObjectToScatteredData(
+  bsplineObject <- ANTsRCore::fitBsplineObjectToScatteredDataR(
     scatteredData, parametricData, dataWeights,
     parametricDomainOrigin, parametricDomainSpacing,
     parametricDomainSize, isParametricDimensionClosed,

diff --git a/R/fitThinPlateSplineDisplacementField.R b/R/fitThinPlateSplineDisplacementField.R
@@ -80,7 +80,7 @@ fitThinPlateSplineDisplacementField <- function(
     stop("Error:  direction is not of size dimensionality x dimensionality.")
   }
 
-  tpsField <- ANTsRCore::fitThinPlateSplineDisplacementField(
+  tpsField <- ANTsRCore::fitThinPlateSplineDisplacementFieldR(
     dimensionality,
     displacementOrigins, displacements,
     origin, spacing, size, direction

diff --git a/R/imagesToMatrix.R b/R/imagesToMatrix.R
@@ -39,5 +39,5 @@ imagesToMatrix <- function(imageList, mask) {
     print("Must pass a list of filenames")
     return(NA)
   }
-  return(ANTsRCore::imagesToMatrix(imageList, mask, n))
+  return(ANTsRCore::imagesToMatrixR(imageList, mask, n))
 }
diff --git a/R/integrateVelocityField.R b/R/integrateVelocityField.R
@@ -25,7 +25,7 @@ integrateVelocityField <- function(
     numberOfIntegrationSteps = 10) {
   dimensionality <- velocityField@dimension - 1
 
-  integratedField <- ANTsRCore::integrateVelocityField(
+  integratedField <- ANTsRCore::integrateVelocityFieldR(
     dimensionality,
     velocityField,
     as.numeric(lowerIntegrationBound),

diff --git a/R/invertDisplacementField.R b/R/invertDisplacementField.R
@@ -23,7 +23,7 @@ invertDisplacementField <- function(
     enforceBoundaryCondition = TRUE) {
   dimensionality <- displacementField@dimension
 
-  inverseField <- ANTsRCore::invertDisplacementField(
+  inverseField <- ANTsRCore::invertDisplacementFieldR(
     dimensionality,
     displacementField,
     inverseFieldInitialEstimate,

diff --git a/R/reflectImage.R b/R/reflectImage.R
@@ -32,7 +32,7 @@ reflectImage <- function(
   }
 
   rflct <- tempfile(fileext = ".mat")
-  catchout <- ANTsRCore::reflectionMatrix(img1, axis, rflct)
+  catchout <- ANTsRCore::reflectionMatrixR(img1, axis, rflct)
 
   if (!all(is.na(tx))) {
     rfi <- antsRegistration(img1, img1,
@@ -71,6 +71,6 @@ reflectionMatrix <- function(img1, axis = NA, reflectionMatrixFilename) {
   if (missing(reflectionMatrixFilename)) {
     reflectionMatrixFilename <- tempfile(fileext = ".mat")
   }
-  catchout <- ANTsRCore::reflectionMatrix(img1, axis, reflectionMatrixFilename)
+  catchout <- ANTsRCore::reflectionMatrixR(img1, axis, reflectionMatrixFilename)
   return(reflectionMatrixFilename)
 }