simulateDisplacementField: simulateDisplacementField

Description Usage Arguments Value Author(s) Examples

View source: R/simulateDisplacementField.R

Description

Simulate a displacement field using random points with B-spline smoothing

Usage

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
simulateDisplacementField(
  domainImage,
  fieldType = c("bspline", "exponential"),
  numberOfRandomPoints = 1000,
  sdNoise = 10,
  enforceStationaryBoundary = TRUE,
  numberOfFittingLevels = 4,
  meshSize = 1,
  sdSmoothing = 4
)

Arguments

domainImage

image to define the domain of the field.

fieldType

either "bspline" or "exponential".

numberOfRandomPoints

number of displacement points. Default = 1000.

sdNoise

standard deviation of the displacement field noise (in mm). Default = 10.0.

enforceStationaryBoundary

boolean determining fixed boundary conditions. Default = TRUE.

numberOfFittingLevels

(bspline only) number of fitting levels. Default = 4.

meshSize

(bspline only) scalar or n-D vector determining fitting resolution. Default = 1.

sdSmoothing

(exponential only) standard deviation of the Gaussian smoothing in mm. Default = 4.0.

Value

ANTsR displacement field.

Author(s)

NJ Tustison

Examples

1
2
3
4
5
domainImage <- antsImageRead( getANTsRData( "r16" ), 2 )
expField <- simulateDisplacementField( domainImage, fieldType = "exponential" )
bsplineField <- simulateDisplacementField( domainImage, fieldType = "bspline" )
warp <- antsrTransformFromDisplacementField( bsplineField * 3 )
wimg <- applyAntsrTransformToImage( warp, domainImage, domainImage )

neuroconductor-devel/ANTsR documentation built on April 1, 2021, 1:02 p.m.