if (FALSE) {
lib.loc = tempdir()
if (download_img_data(lib.loc = lib.loc)){
t2 = readNIfTI(system.file("T2Strip.nii.gz", package="WhiteStripe",
lib.loc = lib.loc))
t2.voi = make_img_voi(t2)
any(is.na(t2.voi))
# FALSE
t2.voi.hist = hist(t2.voi,
breaks=2000,
plot=FALSE)
#save(t2.voi.hist, file="data/t2.voi.hist.rda", compress = TRUE,
# compression_level=9)
}
}
Run the code above in your browser using DataLab