applyAntsrTransformToImage.Rd
Apply transform to spatial point
applyAntsrTransformToImage(
transform,
image,
reference,
interpolation = "linear"
)
antsImage
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)