📄 bfm_plot_datamatcorrs_3v.m
字号:
y = .22;
w = .07;
h = .04;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ...
'Units','normal', ...
'BackgroundColor',[0.8 0.8 0.8], ...
'fontunit','normal', ...
'FontSize',fnt, ...
'HorizontalAlignment','left', ...
'ListboxTop',0, ...
'Position',pos, ...
'String','XYZ:', ...
'ToolTipString','Absolute coxel coordinates', ...
'Style','text', ...
'Tag','XYZVoxelLabel');
x = x+w+0.01;
y = y+.01;
w = .04;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ...
'Units','normal', ...
'fontunit','normal', ...
'FontSize',fnt, ...
'HorizontalAlignment','center', ...
'ListboxTop',0, ...
'Position',pos, ...
'String','go', ...
'ToolTipString','Click to select the XYZ you entered', ...
'Style','push', ...
'Callback','bfm_plot_datamatcorrs_3v(''EditXYZ'')');
x = x+w;
w = .1;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ...
'Units','normal', ...
'BackgroundColor',[1 1 1], ...
'fontunit','normal', ...
'FontSize',fnt, ...
'HorizontalAlignment','center', ...
'ListboxTop',0, ...
'Position',pos, ...
'String','', ...
'ToolTipString','Absolute voxel coordinates', ...
'Style','edit', ...
'Callback','bfm_plot_datamatcorrs_3v(''EditXYZ'')', ...
'Tag','XYZVoxel');
x = .05;
y = y-h-0.02;
w = .07;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ...
'Units','normal', ...
'BackgroundColor',[0.8 0.8 0.8], ...
'fontunit','normal', ...
'FontSize',fnt, ...
'HorizontalAlignment','left', ...
'ListboxTop',0, ...
'Position',pos, ...
'String','XYZ(mm):', ...
'ToolTipString','Voxel coordinates w.r.t. the origin', ...
'Style','text', ...
'Tag','XYZmmLabel');
x = x+w;
w = .15;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ...
'Units','normal', ...
'BackgroundColor',[1 1 1], ...
'fontunit','normal', ...
'FontSize',fnt, ...
'HorizontalAlignment','center', ...
'ListboxTop',0, ...
'Position',pos, ...
'String','', ...
'ToolTipString','Voxel coordinates w.r.t. the origin', ...
'Style','edit', ...
'Callback','bfm_plot_datamatcorrs_3v(''EditXYZmm'')', ...
'Tag','XYZmm');
x = .05;
y = .27;
w = .22;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ... % rescale button
'Units','normal', ...
'BackgroundColor',[0.8 0.8 0.8], ...
'fontunit','normal', ...
'FontSize',fnt, ...
'ListboxTop',0, ...
'Position',pos, ...
'HorizontalAlignment', 'left', ...
'String','RE-SCALE Brain LV', ...
'Style','check', ...
'Value',1, ...
'Visible','off', ...
'Callback','bfm_plot_datamatcorrs_3v(''RescaleBnPress'')', ...
'Tag','RESCALECheckbox');
x = .1;
y = .1;
w = .1;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ...
'Units','normal', ...
'Callback','close(gcf)', ...
'fontunit','normal', ...
'FontSize',fnt, ...
'ListboxTop',0, ...
'Position',pos, ...
'String','CLOSE', ...
'Tag','EXITButton');
x = 0.01;
y = 0;
w = .5;
pos = [x y w h];
h1 = uicontrol('Parent',h0, ... % Message Line
'Style','text', ...
'Units','normal', ...
'BackgroundColor',[0.8 0.8 0.8], ...
'ForegroundColor',[0.8 0.0 0.0], ...
'fontunit','normal', ...
'FontSize',fnt, ...
'HorizontalAlignment','left', ...
'Position',pos, ...
'String','', ...
'Tag','MessageLine');
% File submenu
%
h_file = uimenu('Parent',h0, ...
'Label','&File', ...
'Tag','FileMenu', ...
'Visible','on');
h2 = uimenu(h_file, ...
'Label','&Load Background Image', ...
'Tag','LoadBGImage', ...
'Callback','bfm_plot_datamatcorrs_3v(''LoadBackgroundImage'')');
h2 = uimenu(h_file, ...
'Label','Save brain region to IMG file', ...
'Tag','SaveBGImage', ...
'Callback','bfm_plot_datamatcorrs_3v(''SaveBackgroundImage'')');
h2 = uimenu(h_file, ...
'Label','&Load PLS Result', ...
'Tag','LoadPLSResult', ...
'visible', 'off', ...
'Callback','bfm_plot_datamatcorrs_3v(''LoadResultFile'')');
h2 = uimenu(h_file, ...
'Label','&Save Current Display to the IMG files', ...
'Tag','SaveDisplayToIMG', ...
'Callback','bfm_plot_datamatcorrs_3v(''SaveDisplayToIMG'')');
h2 = uimenu(h_file, ...
'Label','&Save DatamatCorrelation to IMG file', ...
'Tag','SaveResultToIMG', ...
'Callback','bfm_plot_datamatcorrs_3v(''SaveResultToIMG'')');
h2 = uimenu(h_file, ...
'Label','Create Datamat Correlations &Figure', ...
'Tag','PlotNewFigure', ...
'Callback','bfm_plot_datamatcorrs_3v(''PlotOnNewFigure'')');
rri_file_menu(h0);
% Xhair submenu
%
h_xhair = uimenu('Parent',h0, 'Label','Crosshair');
h2 = uimenu('Parent',h_xhair, ...
'Label','Crosshair off', ...
'Userdata', 0, ...
'Callback','pet_result_ui(''crosshair'')', ...
'Tag','XhairToggleMenu');
h2 = uimenu('Parent',h_xhair, ...
'Label','Color ...', ...
'Userdata', [1 0 0], ...
'Callback','pet_result_ui(''set_xhair_color'')', ...
'Tag','XhairColorMenu');
% Zoom submenu
%
h2 = uimenu('Parent',h0, ...
'Label','&Zoom on', ...
'Userdata', 1, ...
'Callback','bfm_plot_datamatcorrs_3v(''Zooming'')', ...
'Tag','ZoomToggleMenu');
% Rotate submenu
%
h_rot = uimenu('Parent',h0, ...
'Label','&Image Rotation', ...
'visible', 'off', ...
'Tag','RotationMenu');
h2 = uimenu('Parent',h_rot, ...
'Label','&none', ...
'Checked','on', ...
'Callback','bfm_plot_datamatcorrs_3v(''Rotation'',1)', ...
'Tag','Rotate0Menu');
h2 = uimenu('Parent',h_rot, ...
'Label','&90 degree', ...
'Checked','off', ...
'Callback','bfm_plot_datamatcorrs_3v(''Rotation'',2)', ...
'Tag','Rotate90Menu');
h2 = uimenu('Parent',h_rot, ...
'Label','&180 degree', ...
'Checked','off', ...
'Callback','bfm_plot_datamatcorrs_3v(''Rotation'',3)', ...
'Tag','Rotate180Menu');
h2 = uimenu('Parent',h_rot, ...
'Label','&270 degree', ...
'Checked','off', ...
'Callback','bfm_plot_datamatcorrs_3v(''Rotation'',0)', ...
'Tag','Rotate270Menu');
% Window submenu
%
h_pls = uimenu('Parent',h0, ...
'Label','&Windows', ...
'Tag','WindowsMenu', ...
'Visible','off');
h2 = uimenu(h_pls, ...
'Label','&Singular Values Plot', ...
'Tag','OpenEigenPlot', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenEigenPlot'')');
h2 = uimenu(h_pls, ...
'Label','&Behavior LV and Behavior Scores Plot', ...
'Tag','OpenBehavPlot', ...
'Visible', 'off', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenScoresPlot'',0)');
h2 = uimenu(h_pls, ...
'Label','&Design Scores and LVs Plot', ...
'Tag','OpenDesignPlot', ...
'Visible', 'off', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenDesignPlot'')');
h2 = uimenu(h_pls, ...
'Label','B&rain Scores vs. Behavior Data Plot', ...
'Tag','OpenBrainPlot', ...
'Visible', 'off', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenBrainPlot'')');
h2 = uimenu(h_pls, ...
'Label','&Brain Scores Plot', ...
'Tag','OpenBrainScoresPlot', ...
'visible','off', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenBrainScoresPlot'')');
h2 = uimenu(h_pls, ...
'Label','&Datamat Correlations Response', ...
'Tag','OpenRF1Plot', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenCorrelationPlot'')');
h2 = uimenu(h_pls, ...
'Label','&Datamat Correlations Plot', ...
'Tag','OpenDatamatcorrsPlot', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenDatamatcorrsPlot'')');
h2 = uimenu(h_pls, ...
'Label','&Contrasts Information', ...
'Tag','OpenContrastWindow', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenContrastWindow'')');
h2 = uimenu(h_pls, ...
'Label','Create Brain LV &Figure', ...
'separator', 'on', ...
'Tag','PlotNewFigure', ...
'Callback','bfm_plot_datamatcorrs_3v(''PlotOnNewFigure'')');
% Report submenu
%
h_pls = uimenu('Parent',h0, ...
'Label','&Report', ...
'Tag','WindowsMenu', ...
'Visible','off');
h2 = uimenu(h_pls, ...
'Label','&Set Cluster Report Options', ...
'Tag','SetClusterReportOptions', ...
'Callback','bfm_plot_datamatcorrs_3v(''SetClusterReportOptions'')');
h2 = uimenu(h_pls, ...
'Label','&Load Cluster Report', ...
'Tag','LoadClsuterReport', ...
'Callback','bfm_plot_datamatcorrs_3v(''LoadClusterReport'')');
h2 = uimenu(h_pls, ...
'Label','&Create Cluster Report', ...
'Tag','OpenClusterReport', ...
'Callback','bfm_plot_datamatcorrs_3v(''OpenClusterReport'')');
% Help submenu
%
Hm_topHelp = uimenu('Parent',h0, ...
'Label', '&Help', ...
'visible', 'off', ...
'Tag', 'Help');
Hm_how = uimenu('Parent',Hm_topHelp, ...
'Label', '&How to use this window?', ...
'Callback','rri_helpfile_ui(''bfm_result_hlp.txt'',''How to use PLS RESULT'');', ...
'visible', 'off', ...
'Tag', 'How');
Hm_new = uimenu('Parent',Hm_topHelp, ...
'Label', '&What''s new', ...
'Callback','rri_helpfile_ui(''whatsnew.txt'',''What''''s new'');', ...
'Tag', 'New');
Hm_about = uimenu('Parent',Hm_topHelp, ...
'Label', '&About this program', ...
'Tag', 'About', ...
'CallBack', 'plsgui_version');
set(gcf,'Name',sprintf('Blocked fMRI BLV Plot: %s',PLSResultFile));
set(colorbar_h,'units','normal');
setappdata(gcf,'Colorbar',colorbar_h);
setappdata(gcf,'BlvAxes',axes_h);
setappdata(gcf,'ClusterMinSize',5);
setappdata(gcf,'ClusterMinDist',10);
setappdata(gcf,'setting',setting);
setappdata(gcf,'old_setting',setting);
setappdata(gcf,'img_xhair',[]);
return; % init
%---------------------------------------------------------------------------
%
function DeleteLinkedFigure()
rf_plot = getappdata(gcbf,'RFPlotHdl');
if ~isempty(rf_plot) & ishandle(rf_plot)
close(rf_plot);
end;
scores_fig = getappdata(gcbf,'ScorePlotHdl');
if ~isempty(scores_fig)
close(scores_fig);
end;
bscores_fig = getappdata(gcbf,'BSPlotHdl');
if ~isempty(bscores_fig) & ishandle(bscores_fig)
close(bscores_fig);
end;
eigen_fig = getappdata(gcbf,'EigenPlotHdl');
if ~isempty(eigen_fig) & ishandle(eigen_fig)
close(eigen_fig);
end;
brain_fig = getappdata(gcbf,'brain_plot');
if ~isempty(brain_fig) & ishandle(brain_fig)
close(brain_fig);
end;
contrast_fig = getappdata(gcbf,'ContrastFigHdl');
if ~isempty(contrast_fig) & ishandle(contrast_fig)
close(contrast_fig);
end;
return; % DeleteLinkedFigure
%---------------------------------------------------------------------------
%
function rot_amount = load_pls_result()
% wait message
old_pointer = get(gcf,'Pointer');
set(gcf,'Pointer','watch');
msg = 'Loading PLS result ... please wait';
set(findobj(gcf,'Tag','MessageLine'),'String',msg);
h = findobj(gcf,'Tag','ResultFile');
PLSresultFile = get(h,'UserData');
load(PLSresultFile);
if exist('bscan','var') & ~isempty(bscan)
num_conditions = length(bscan);
end
if(0)
if exist('datamatcorrs_lst','var')
setappdata(gcf,'isbehav',1);
else
setappdata(gcf,'isbehav',0);
set(findobj(gcf,'tag','OpenRF1Plot'), 'visible', 'off');
end
if isfield(boot_result,'compare')
boot_result.compare_brain = boot_result.compare;
end
end
setting = getappdata(gcf,'setting');
if isempty(setting)
grp_idx = 1; % group idx
lv_idx = 1; % condition idx
bs_lv_idx = 1;
behav_idx = 1; % behavior idx
rot_amount = 1;
else
grp_idx = setting.grp_idx;
lv_idx = setting.lv_idx;
if isfield(setting, 'bs_lv_idx')
bs_lv_idx = setting.bs_lv_idx;
else
bs_lv_idx = 1;
end
behav_idx = setting.behav_idx;
rot_amount = setting.rot_amount;
end;
num_grp = length(num_subj_lst);
num_lv = num_conditions;
bs_num_lv = size(brainlv,2);
brainlv = datamatcorrs_lst{grp_idx};
num_behav = size(brainlv, 1) / num_conditions;
if exist('behavlv','var')
set(findobj(gcf,'Tag','OpenBehavPlot'), 'Visible', 'Off');
set(findobj(gcf,'Tag','OpenDesignPlot'), 'Visible', 'Off');
set(findobj(gcf,'Tag','OpenBrainPlot'), 'Visible', 'On');
elseif exist('designlv','var')
set(findobj(gcf,'Tag','OpenBehavPlot'), 'Visible', 'Off');
set(findobj(gcf,'Tag','OpenDesignPlot'), 'Visible', 'On');
set(findobj(gcf,'Tag','OpenBrainPlot'), 'Visible', 'Off');
end
h = findobj(gcf,'Tag','GroupIndexEdit');
set(h,'String',num2str(grp_idx),'Userdata',grp_idx);
h = findobj(gcf,'Tag','GroupNumberEdit');
set(h,'String',num2str(num_grp),'Userdata',num_grp);
h = findobj(gcf,'Tag','LVIndexEdit');
set(h,'String',num2str(lv_idx),'Userdata',lv_idx);
h = findobj(gcf,'Tag','LVNumberEdit');
set(h,'String',num2str(num_lv),'Userdata',num_lv);
h = findobj(gcf,'Tag','BSLVIndexEdit');
set(h,'String',num2str(bs_lv_idx),'Userdata',bs_lv_idx);
h = findobj(gcf,'Tag','BSLVNumberEdit');
set(h,'String',num2str(bs_num_lv),'Userdata',bs_num_lv);
h = findobj(gcf,'Tag','BehavIndexEdit');
set(h,'String',num2str(behav_idx),'Userdata',behav_idx);
h = findobj(gcf,'Tag','BehavNumberEdit');
set(h,'String',num2str(num_behav),'Userdata',num_behav);
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -