Homec4science
Diffusion Clustering XTension (master) Browse

xt-clustering/functions/manualAverageInterface.m
7caf99922e6dmaster

Last Change
Raw File

manualAverageInterface.m
View Options

function manualAverageInterface
global X;
global intensities;
f = figure('Name', 'BIOP - Spots Stats', ...
'NumberTitle', 'off', 'Visible', 'off', 'Position', [0 0 500 200], ...
'Tag', 'main_f', ...
'DockControls', 'off', 'ToolBar', 'none', 'MenuBar', 'none');
% Move the window to the center of the screen.
movegui(f,'center');
% Make the window visible.
f.Visible = 'on';
l = .05;
w = .4;
h = .1;
s = 0.1;
% Refresh button
uicontrol(f,'Style','pushbutton','String','Calculate',...
'Units','normalized', 'Tag', 'btn_stats_refresh', ...
'Position',[0.10 .75 0.8 h*2],...
'Callback', @btn_stats_refresh_callback);
% Info text
uicontrol(f,'Style','text','String','Spots Selected: ',...
'Units','normalized', ...
'HorizontalAlignment', 'right', ...
'Position',[l .60 0.32 h]);
uicontrol(f,'Style','text','String','',...
'Units','normalized', 'Tag', 'txt_spot_name', ...
'HorizontalAlignment', 'left', ...
'Position',[l+0.33 .60 0.5 h]);
uicontrol(f,'Style','text','String','',...
'Units','normalized', 'Tag', 'txt_spot_stats', ...
'FontWeight', 'bold', ...
'HorizontalAlignment', 'left', ...
'Position',[0.26 .44 0.9 h]);
% 'Add to' popup list
options = {};
chan={};
nChan = getChannelIndexes();
manCat = getFromTag('txt_manual_cat_num', 'Number');
for i=nChan
chan{end+1} = sprintf('Channel %d', i);
options{end+1} = sprintf('Channel %d BG',i);
for j=1:(manCat-1)
options{end+1} = sprintf('Channel %d Thr %d',i,j);
end
end
%Choose Channel
uicontrol(f, 'Style', 'popup',...
'Units','normalized', 'Tag', 'popup_chan', ...
'String', chan,...
'Position',[l .45 0.2 h]);
uicontrol(f, 'Style', 'popup',...
'Units','normalized', 'Tag', 'popup_add_to', ...
'String', options,...
'Position',[l .15 0.5 h]);
% Add to button
uicontrol(f,'Style','pushbutton','String','Add',...
'Units','normalized', 'Tag', 'btn_add', ...
'Position',[l+0.55 .15 0.2 .1],...
'Callback', @btn_add_callback);
end
function btn_stats_refresh_callback(hObject, eventdata, handles)
global X;
global intensities;
choices = get(findobj('Tag', 'popup_chan'),'String');
choice = choices{getFromTag('popup_chan')}
expression = 'Channel (?<channel>\d+)';
tokenNames = regexp(choice,expression,'names');
spots = X.GetObject();
idx = spots.GetSelectedIndices();
stats = X.GetSelectedStatistics(spots, 'Intensity Mean', 'Channel', str2num(tokenNames.channel(1)))
intensities = stats.values(idx+1);
setFromTag('txt_spot_name', X.GetName(spots));
setFromTag('txt_spot_stats', sprintf('%d Spots, Average Intensity %.1f, SD %.1f', numel(intensities), mean(intensities), std(intensities)));
end
function btn_add_callback(hObject, eventdata, handles)
% Get popup options
global intensities;
choices = get(findobj('Tag', 'popup_add_to'),'String');
choice = choices{getFromTag('popup_add_to')};
expression = ['Channel (?<channel>\d+) [BGThr ]+(?<cat>[\d]*).*'];
tokenNames = regexp(choice,expression,'names');
if isempty(tokenNames.cat)
%BG
setFromTag(sprintf('txt_manual_bg_ch_%s',tokenNames.channel(1)), sprintf('%.1f',mean(intensities)+3*std(intensities)));
else
setFromTag(sprintf('txt_manual_cat_%s_ch_%s',tokenNames.cat(1), tokenNames.channel(1)), sprintf('%.1f',mean(intensities)-3*std(intensities)));
end
end
c4science · Help