Here we will download a single subject from the cross-sectional data with MS using the download_ms_patient function:
download_ms_patient
library(msmri) files = download_ms_patient( id = 2, cohort = "cross_sectional", data = "raw")
library(oro.nifti) oro.nifti 0.10.1 fname = files[1]