Nothing
# TODO: Add comment
#
# Author: brad
###############################################################################
test.asNIfTIMetaInfo <- function() {
meta <- BrainMetaInfo(c(64,64,64), c(2,2,2), c(0,0,0), "DOUBLE")
## as(meta, "NIfTIMetaInfo") requires a volume ....
#nimeta <- as(meta, "NIfTIMetaInfo")
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.