Returns a 3D average of a 4D time series.

getAverageOfTimeSeries(img)

Arguments

img

input 4D image

Value

3D ants image is output

Author

Avants BB

Examples

img <- as.antsImage(array(data = rep(0, 10^4), dim = c(10, 10, 10, 10)))
avg <- getAverageOfTimeSeries(img)