0001 function prepare_leadfield_eeg(p)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012 leadfield_dir = fullfile(p.proj_root, p.eeg_dirname, p.leadfield_dirname);
0013 if exist(leadfield_dir, 'dir') ~= 7
0014 mkdir(leadfield_dir);
0015 end
0016
0017
0018
0019 basis_parm.device = 'BRAINAMP';
0020 basis_parm.bem_mode = 4;
0021 basis_parm.Basis_mode = 1;
0022 basis_parm.meg_file = fullfile(p.proj_root, p.eeg_dirname, p.trial_dirname, 'cribr_s1.eeg.mat');
0023
0024
0025 basis_parm.basis_file = fullfile(p.eeg_dirname, p.leadfield_dirname, ['standard_' p.struct_name '.basis.mat']);
0026 standard_basis_file = fullfile(p.proj_root, basis_parm.basis_file);
0027
0028
0029
0030
0031
0032 [pick, Qpick, CoilWeight, Vcenter, result, channel_info] = vb_load_sensor(basis_parm.meg_file);
0033 load('mni_icbm152_t1_tal_nlin_asym_09c_10000.basis.mat', 'ChannelName','basis','basis_parm');
0034 ch=size(channel_info.Name,1);
0035
0036 match=0;
0037 for i=1:ch
0038
0039 match(i)=strmatch(channel_info.Name{i},ChannelName,'exact');
0040
0041 end
0042
0043 match=sort(match);
0044
0045 basis=basis(:,match);
0046
0047 for v = 1:size(basis, 1);
0048 basis(v, :) = basis(v, :)-mean(basis(v,:), 2);
0049 end
0050
0051 vb_save(standard_basis_file, 'basis', 'basis_parm');
0052
0053
0054 end