MNI Download URL

mni_url(group = c("icbm152", "PD25", "colin27", "mni305", "pediatric",
  "infant"))

mni_urls()

Arguments

group	Group of data, from `mni_datasets` to get URL

Value

A character vector

Examples


library(utils)
mni_url()
#> [1] "http://packages.bic.mni.mcgill.ca/mni-models"
mni_url("pediatric")
#> [1] "http://www.bic.mni.mcgill.ca/~vfonov/nihpd"
df = mni_datasets()
df$url = sapply(df$group, mni_url)
df$url = file.path(df$url, df$file)

destfile = tempfile(fileext = ".zip")
if (FALSE) {
dl = download.file(url = df$url[2], destfile = destfile)
}

df = mni_datasets("minc1")
df$url = sapply(df$group, mni_url)
df$url = file.path(df$url, df$file)

destfile = tempfile(fileext = ".zip")
if (FALSE) {
dl = download.file(url = df$url[2], destfile = destfile)
}