Apply transform to spatial point

applyAntsrTransformToImage(
  transform,
  image,
  reference,
  interpolation = "linear"
)

Arguments

transform

antsrTransform

image

antsImage to transform

reference

antImage giving the reference output space

interpolation

type of interpolator to use

Value

antsImage

Examples

img <- antsImageRead(getANTsRData("r16"))
tx <- new("antsrTransform", precision = "float", type = "AffineTransform", dimension = 2)
setAntsrTransformParameters(tx, c(0.9, 0, 0, 1.1, 10, 11))
img2 <- applyAntsrTransformToImage(tx, img, img)
# plot(img,img2)