0001 function vb_plot_fmri(plot_parm)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020
0021
0022
0023
0024
0025
0026 if isfield(plot_parm,'fmri_key') & ~isempty(plot_parm.fmri_key)
0027 fmrifile = plot_parm.fmrifile;
0028 fMRI = get_fmri(fmrifile,plot_parm.fmri_key);
0029 xxP = fMRI.xxP;
0030 else
0031 xxP = [];
0032 end
0033
0034
0035 if isfield(plot_parm,'area')
0036 plot_parm.area.str = plot_parm.area.key;
0037 plot_parm.area.fs = 10;
0038 plot_parm.area.clr = {'r','g','b','c','m','y'};
0039 plot_parm.area.R = 1.5;
0040
0041 while 1
0042 if length(plot_parm.area.clr) >= length(plot_parm.area.key)
0043 break;
0044 end
0045 plot_parm.area.clr = [plot_parm.area.clr plot_parm.area.clr];
0046 end
0047 end
0048
0049
0050 NX = 1;
0051 NY = 1;
0052 plot_parm.wmax = 1;
0053 plot_parm.J = xxP;
0054 plot_parm.index = [];
0055 plot_parm.threshold = min(xxP(find(xxP)));
0056
0057
0058 if plot_parm.mode == 2
0059 switch plot_parm.LRflag
0060 case 'LR',
0061 LRflag = {'XLB','XRF','YLB','YRB','ZLB','ZRB'};
0062 case 'L',
0063 LRflag = {'XLF','XLB','YLF','YLB','ZLF','ZLB'};
0064 case 'R',
0065 LRflag = {'XRF','XRB','YRF','YRB','ZRF','ZRB'};
0066 end
0067 end
0068
0069
0070 switch plot_parm.mode
0071 case 0,
0072 vb_plot_brain(plot_parm);
0073 view([90 0]);
0074 camlight headlight;
0075 view([270 0]);
0076 camlight headlight;
0077 case 1,
0078 plot_parm.sulcus = 1;
0079 vb_plot_brain_inflate(plot_parm);
0080 case 2,
0081 plot_parm.LRflag = LRflag{i};
0082 vb_plot_brain_flat(plot_parm);
0083 title(LRflag{i});
0084 end
0085
0086 axis equal;
0087 axis off;
0088