padImageByFactor.RdPad image of size (x, y, z) to (x', y', z')} where
\code{(x', y', z') is a divisible by a user-specified factor.
padImageByFactor(image, factor)a padded image
library( ANTsR )
image <- antsImageRead( getANTsRData( "r16" ) )
image <- cropImage( image )
paddedImage <- padImageByFactor( image, 4 )