spm_data_hdr_write.m
31022b3a13e6master

spm_data_hdr_write.m
View Options

			function V = spm_data_hdr_write(V)
			% Write data information to disk
			% FORMAT V = spm_data_hdr_write(V)
			% V - a structure array (see spm_data_hdr_read)
			%__________________________________________________________________________
			% Copyright (C) 2012-2016 Wellcome Trust Centre for Neuroimaging

			% Guillaume Flandin
			% $Id: spm_data_hdr_write.m 6752 2016-03-24 16:17:25Z guillaume $


			switch lower(spm_file(V(1).fname,'ext'))
			case {'nii','hdr','img'}
			if ~isfield(V(1),'dat'), V = spm_create_vol(V); end

			case 'gii'
			for i=1:numel(V)
			V(i).private = gifti(struct('cdata',zeros(V(i).dim)));
			V(i).private.private.data{1}.attributes.DataType = ...
			['NIFTI_TYPE_' upper(spm_type(V(i).dt(1)))];
			if isfield(V(i),'SurfaceID')
			V(i).private.private.metadata(1).name = 'SurfaceID';
			V(i).private.private.metadata(1).value = V(i).SurfaceID;
			end
			% see also endianness, scale/offset/offset_byte, metadata
			save(V(i).private, V(i).fname, 'ExternalFileBinary');
			V(i).private = gifti(V(i).fname);
			%V(i).private.dat = file_array(spm_file(V(i).fname,'ext','dat'), ...
			% V(i).dim, spm_type(V(i).dt(1)));
			end
			if isfield(V,'SurfaceID'), V = rmfield(V,'SurfaceID'); end

			otherwise
			error('File "%s" is not of a recognised type.', V(1).fname);
			end