bryan/hartman-server
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Squashed initial commit

Browse Source
This commit is contained in:
Bryan Roessler
2024-09-10 13:47:29 -04:00
commit 8ebb6ad265
6221 changed files with 2512206 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

65
qhtcp-workflow/apps/matlab/ezview/EZviewInfoBox.m Executable file
View File

@@ -0,0 +1,65 @@
%{
%One time create EZsgdInfo .mat file
[SGDnum SGDtext SGDraw]=xlsread('GnOrfDesc.xls');
save('EZsgdInfo','SGDnum','SGDtext','SGDraw')
%load 'EZsgdInfo'
%}
text=Exp(4).SGDtext;
destPerMP= Exp(zoneSel).Dexp(DexpN).destPerMP; %length(gS.DM1.drug);
pertSel=Exp(zoneSel).Dexp(DexpN).pertSel; %floor(get(handles.DMsldr1,'value'));
plateNum=(LBmp-1)*destPerMP + pertSel;
indx=((LBr-1)*24) +LBc
MP=Exp(zoneSel).Dexp(DexpN).MP;
a=[];
if get(handles.GeneOrfTog,'value')==0
gene=MP(1,LBmp).genename{1,1}(indx);
gnLength=length(char(gene));
a=find(strncmpi(text(:,6,:),gene,gnLength));
if ~isempty(a)
desc=char(text(a,32,:));
proc=char(text(a,18,:));
func=char(text(a,19,:));
loc=char(text(a,20,:));
orfXref=char(text(a,2,:));
gnXref=char(text(a,6,:));
if strcmpi(gnXref,'HO'), gene=strcat(gene,',',gnXref);end
name=strcat(char(gene),'->',char(orfXref));
end
elseif get(handles.GeneOrfTog,'value')==1
orf=MP(1,LBmp).orf{1,1}(indx);
orfLength=length(char(orf));
a=find(strncmpi(text(:,2,:),orf,orfLength));
if ~isempty(a)
desc=char(text(a,32,:));
proc=char(text(a,18,:));
func=char(text(a,19,:));
loc=char(text(a,20,:));
gnXref=char(text(a,6,:));
if strcmpi(gnXref,'HO'), gnXref=strcat('RF_,',gnXref);end
name=strcat(char(gnXref),'->',char(orf));
end
end
if isempty(a)
name='Not Found';
desc=[]; proc=[]; func=[]; loc=[];
end
%{
if get(handles.listboxGnOrf,'value')&& ~isempty(a)
desc=char(text(a,32,:));
proc=char(text(a,18,:));
func=char(text(a,19,:));
loc=char(text(a,20,:));
name=strcat(char(gene),'->',char(orf));
elseif get(handles.listboxGnOrf,'value') && ~isempty(a)
desc=char(text(b,32,:));
proc=char(text(b,18,:));
func=char(text(b,19,:));
loc=char(text(b,20,:));
name=strcat(char(gene),'->',char(orf));
elseif isempty(b)
name='Not Found';
desc=[]; proc=[]; func=[]; loc=[];
end
%}
hh=msgbox(sprintf('%s\n%s\n%s%s\n%s%s\n%s%s\n',name,desc,'P->',proc,'F->',func,'C->',loc),'SGD Ontology Info','replace')