EZsingleExUserRF.m 3.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127
  1. % EZsingleExUserRF
  2. global exp
  3. usrRefFg=0;
  4. prompt={'Enter GeneName to use as Reference:',...
  5. 'Enter Specifics Term if used to futher specify Reference '}
  6. dlg_title='User Reference Input';
  7. num_lines=1;
  8. def={'RF1','None'};
  9. answer=inputdlg(prompt,dlg_title,num_lines,def);
  10. rfGene=cell2mat(answer(1));
  11. if ~strcmpi(rfGene,'RF1')|| ~strcmpi(rfGene,'RF2'), usrRefFg=1; end
  12. rfSpec=answer(2); %if strcmpi(answer(2),'None'), rfSpec=''; end
  13. rfGnSp=strcat(rfGene,rfSpec);
  14. if strcmpi(rfSpec,'None'), rfGnSp=strcat(rfGene,'-'); end
  15. % for n=1:size(matFile,2)
  16. n=1;
  17. EZmultiGeneRFsLst
  18. EZdiagRFsSheet
  19. Exp(expN).Dexp(n).RFrnames=rnames;
  20. Exp(expN).Dexp(n).RFdata=data;
  21. RFconfig=0;
  22. if sum(ismember(fieldnames(Exp(expN).Dexp(n)),'RFmean')) ...
  23. && ~isempty(Exp(expN).Dexp(n).RFmean) ...
  24. && sum(ismember(fieldnames(Exp(expN).Dexp(n)),'RFmeanG')) ...
  25. && isempty(Exp(expN).Dexp(n).RFmeanG)
  26. RFconfig=1;
  27. end
  28. if sum(ismember(fieldnames(Exp(expN).Dexp(n)),'RFmean'))==0 ...
  29. || isempty(Exp(expN).Dexp(n).RFmean) ...
  30. && sum(ismember(fieldnames(Exp(expN).Dexp(n)),'RFmeanG')) ...
  31. && ~isempty(Exp(expN).Dexp(n).RFmeanG)
  32. RFconfig=2;
  33. end
  34. if sum(ismember(fieldnames(Exp(expN).Dexp(n)),'RFmean'))&&...
  35. ~isempty(Exp(expN).Dexp(n).RFmean)&&...
  36. sum(ismember(fieldnames(Exp(expN).Dexp(n)),'RFmeanG'))&&...
  37. ~isempty(Exp(expN).Dexp(n).RFmeanG)
  38. RFconfig=3;
  39. end
  40. Exp(expN).RFconfig=RFconfig;
  41. Exp(expN).Dexp(n).RFconfig=RFconfig;
  42. try msgBadGeneName, catch, end
  43. try
  44. Exp(expN).Dexp(n).resetHtmpTg =5; %Exp(expN).resetHtmpTg =5;
  45. if RFconfig==0,
  46. RFconfigMsg='No RF1 references in this Experiment Job'
  47. Exp(expN).Dexp(n).resetHtmpTg =3; %Exp(expN).resetHtmpTg =3;
  48. end
  49. catch
  50. end
  51. % Auto select Zone and load listboxGnOrf data
  52. DexpN=1;
  53. zeroCLn=zeros(1,DMnum);
  54. Exp(expN).expLoadCnt=Exp(expN).expLoadCnt+1; expLdCnt=Exp(expN).expLoadCnt;
  55. if expN==1
  56. set(handles.zoneRad1,'value',1)
  57. set(handles.zoneRad2,'value',0)
  58. set(handles.zoneRad3,'value',0)
  59. orfLstSel=get(handles.GeneOrfTog,'value')
  60. if orfLstSel==1
  61. set(handles.listboxGnOrf,'string',Exp(1).Dexp(1).srtOrfLst)
  62. else
  63. set(handles.listboxGnOrf,'string',Exp(1).Dexp(1).srtGnLst)
  64. end
  65. DNLaxes1=handles.DNLaxes1;
  66. Exp(1).hzeroCLn(expLdCnt)=plot(DNLaxes1,zeroCLn,1:DMnum,'y');
  67. end
  68. if expN==2
  69. set(handles.zoneRad1,'value',0)
  70. set(handles.zoneRad3,'value',0)
  71. set(handles.zoneRad2,'value',1)
  72. orfLstSel=get(handles.GeneOrfTog,'value');
  73. if orfLstSel==1
  74. set(handles.listboxGnOrf,'string',Exp(2).Dexp(1).srtOrfLst)
  75. else
  76. set(handles.listboxGnOrf,'string',Exp(2).Dexp(1).srtGnLst)
  77. end
  78. DNLaxes2=handles.DNLaxes2;
  79. Exp(2).hzeroCLn(expLdCnt)=plot(DNLaxes2,zeroCLn,1:DMnum,'y');
  80. end
  81. if expN==3
  82. set(handles.zoneRad1,'value',0)
  83. set(handles.zoneRad2,'value',0)
  84. set(handles.zoneRad3,'value',1)
  85. orfLstSel=get(handles.GeneOrfTog,'value');
  86. if orfLstSel==1
  87. set(handles.listboxGnOrf,'string',Exp(3).Dexp(1).srtOrfLst)
  88. else
  89. set(handles.listboxGnOrf,'string',Exp(3).Dexp(1).srtGnLst)
  90. end
  91. DNLaxes3=handles.DNLaxes3;
  92. Exp(3).hzeroCLn(expLdCnt)=plot(DNLaxes3,zeroCLn,1:DMnum,'y');
  93. end
  94. if Exp(4).interacPBsel==0 % if interaction "raw" don't show a center line
  95. for i=1:Exp(expN).expLoadCnt,
  96. try
  97. set(Exp(expN).hzeroCLn(i),'visible','off');
  98. catch
  99. i
  100. end
  101. end
  102. end
  103. % HtMapTog 'string', 'Current user L/N' selection'
  104. Exp(expN).Dexp(DexpN).spotIndx=[];
  105. if expN==1,
  106. Exp(1).htmapPBsel=0;
  107. set(handles.HtMapTog1,'string','L')
  108. EZhtMap
  109. end
  110. if expN==2,
  111. Exp(2).htmapPBsel=0;
  112. set(handles.HtMapTog2,'string','L')
  113. EZhtMap
  114. end
  115. if expN==3,
  116. Exp(3).htmapPBsel=0;
  117. set(handles.HtMapTog3,'string','L')
  118. EZhtMap
  119. end
  120. htMapTogPBfg=0;