antsrMetricSetMovingTransform.Rd
set transform for moving image
antsrMetricSetMovingTransform(metric, transform)
metric | an 'antsrMetric' |
---|---|
transform | an 'antsrTransform' |
x = antsImageRead( getANTsRData( 'r16' )) y = antsImageRead( getANTsRData( 'r30' )) metric = antsrMetricCreate(x,y,type="ANTSNeighborhoodCorrelation") tx <- createAntsrTransform( precision="double", type="AffineTransform", dimension=2) setAntsrTransformParameters(tx, c(0,-1,1,0,0,0)) setAntsrTransformFixedParameters(tx, c(128,128)) antsrMetricSetMovingTransform(metric, tx)#> antsrMetric_SetTransform()antsrMetricGetValue(metric)#> [1] -0.7576979