vb_check_fmri

 Plot fMRI activity on the brain model.

 [syntax]
 vb_check_fmri(proj_root,fmri_parm)

 [history]
 2010-08-25 Taku Yoshioka

 Copyright (C) 2011, ATR All Rights Reserved.
 License : New BSD License(see VBMEG_LICENSE.txt)

0001 function vb_check_fmri(proj_root,fmri_parm)
0002 % Plot fMRI activity on the brain model.
0003 %
0004 % [syntax]
0005 % vb_check_fmri(proj_root,fmri_parm)
0006 %
0007 % [history]
0008 % 2010-08-25 Taku Yoshioka
0009 %
0010 % Copyright (C) 2011, ATR All Rights Reserved.
0011 % License : New BSD License(see VBMEG_LICENSE.txt)
0012 
0013 % Filename and fMRI activity ID
0014 brainfile = [proj_root filesep fmri_parm.brain_file];
0015 actfile   = [proj_root filesep fmri_parm.act_file ]; 
0016 fmri_id   = fmri_parm.fmri_id;
0017 
0018 % Load fMRI activity
0019 act = vb_get_act(actfile,fmri_id);
0020 xxP = act.xxP;
0021 
0022 % View setting
0023 angle = [-60 30; 60 30];
0024 NY    = 1;
0025 NX    = 2;
0026 
0027 % Plot
0028 figure; 
0029 plot_parm = vb_set_plot_parm; 
0030 
0031 % Fold display
0032 [V,F,xx,inf_C] = vb_load_cortex(brainfile);
0033 V = V*1000; % [m]->[mm]
0034 subplot(NY,NX,1);
0035 h = vb_plot_cortex(plot_parm,V,F,inf_C,xxP);
0036 axis equal;
0037 view(angle(1,:));
0038 camlight(h,'headlight');
0039 xlabel('[mm]');
0040 ylabel('[mm]');
0041 zlabel('[mm]');
0042 title('fMRI on cortical surface');
0043 
0044 % Inflate display
0045 [V,F,xx,inf_C] = vb_load_cortex(brainfile,'Inflate');
0046 subplot(NY,NX,2);
0047 vb_plot_cortex(plot_parm,V,F,inf_C,xxP);
0048 axis equal
0049 view(angle(2,:));
0050 camlight headlight;
0051 title('fMRI on cortical surface (inflate display)');
0052 
0053 return;