powered by
f.write.list.to.hdr.nifti(L,file)
f.basic.hdr.nifti.list.create
a<-array(rnorm(20*30*40*3),dim=c(20,30,40,3)) file<-"temp.hdr" b<-f.basic.hdr.nifti.list.create(dim(a), file) f.write.list.to.hdr.nifti(b,file)
Run the code above in your browser using DataLab