EZviewInfoBox.m 2.0 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465
  1. %{
  2. %One time create EZsgdInfo .mat file
  3. [SGDnum SGDtext SGDraw]=xlsread('GnOrfDesc.xls');
  4. save('EZsgdInfo','SGDnum','SGDtext','SGDraw')
  5. %load 'EZsgdInfo'
  6. %}
  7. text=Exp(4).SGDtext;
  8. destPerMP= Exp(zoneSel).Dexp(DexpN).destPerMP; %length(gS.DM1.drug);
  9. pertSel=Exp(zoneSel).Dexp(DexpN).pertSel; %floor(get(handles.DMsldr1,'value'));
  10. plateNum=(LBmp-1)*destPerMP + pertSel;
  11. indx=((LBr-1)*24) +LBc
  12. MP=Exp(zoneSel).Dexp(DexpN).MP;
  13. a=[];
  14. if get(handles.GeneOrfTog,'value')==0
  15. gene=MP(1,LBmp).genename{1,1}(indx);
  16. gnLength=length(char(gene));
  17. a=find(strncmpi(text(:,6,:),gene,gnLength));
  18. if ~isempty(a)
  19. desc=char(text(a,32,:));
  20. proc=char(text(a,18,:));
  21. func=char(text(a,19,:));
  22. loc=char(text(a,20,:));
  23. orfXref=char(text(a,2,:));
  24. gnXref=char(text(a,6,:));
  25. if strcmpi(gnXref,'HO'), gene=strcat(gene,',',gnXref);end
  26. name=strcat(char(gene),'->',char(orfXref));
  27. end
  28. elseif get(handles.GeneOrfTog,'value')==1
  29. orf=MP(1,LBmp).orf{1,1}(indx);
  30. orfLength=length(char(orf));
  31. a=find(strncmpi(text(:,2,:),orf,orfLength));
  32. if ~isempty(a)
  33. desc=char(text(a,32,:));
  34. proc=char(text(a,18,:));
  35. func=char(text(a,19,:));
  36. loc=char(text(a,20,:));
  37. gnXref=char(text(a,6,:));
  38. if strcmpi(gnXref,'HO'), gnXref=strcat('RF_,',gnXref);end
  39. name=strcat(char(gnXref),'->',char(orf));
  40. end
  41. end
  42. if isempty(a)
  43. name='Not Found';
  44. desc=[]; proc=[]; func=[]; loc=[];
  45. end
  46. %{
  47. if get(handles.listboxGnOrf,'value')&& ~isempty(a)
  48. desc=char(text(a,32,:));
  49. proc=char(text(a,18,:));
  50. func=char(text(a,19,:));
  51. loc=char(text(a,20,:));
  52. name=strcat(char(gene),'->',char(orf));
  53. elseif get(handles.listboxGnOrf,'value') && ~isempty(a)
  54. desc=char(text(b,32,:));
  55. proc=char(text(b,18,:));
  56. func=char(text(b,19,:));
  57. loc=char(text(b,20,:));
  58. name=strcat(char(gene),'->',char(orf));
  59. elseif isempty(b)
  60. name='Not Found';
  61. desc=[]; proc=[]; func=[]; loc=[];
  62. end
  63. %}
  64. 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')