| powers_areal_mni_itk | R Documentation |
A data frame providing coordinates for the nodes identified by Powers at al. Coordinates have been modified from nifti space to ITK space
powers_areal_mni_itk
A data frame listing the following variables.
xx coordinate
yy coordinate
zz coordinate
ROIunique integer for each node
SystemLabelunique integer for each system
SystemNameunique name for each system
Colorname of color for system
rred value for system
ggreen value for system
bblue value for system
Anatomyanatomical location as determined by OASIS labeling
Lobelobe location of node
BrodmannBroadmann area number
AALAAL region label
#' @references http://www.nil.wustl.edu/labs/petersen/Resources.html
data(powers_areal_mni_itk)
## Not run:
fixed <- antsImageRead(getANTsRData("ch2"))
moving <- antsImageRead(getANTsRData("mni"))
mytx <- antsRegistration(
fixed = fixed, moving = moving,
typeofTransform = c("SyN")
)
data("powers_areal_mni_itk", package = "ANTsR", envir = environment())
coords <- powers_areal_mni_itk[, 1:3]
ch2reg <- antsRegistration(fixed, moving, typeofTransform = "SyN")
coordsw <- antsApplyTransformsToPoints(
dim = 3, points = coords,
transformlist = ch2reg$fwdtransforms,
whichtoinvert = c(FALSE, FALSE)
)
ptrd <- 3
powersLabels <- makePointsImage(coordsw, moving, radius = pard)
plot(moving, powersLabels, axis = 3, nslices = 30)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.