EZdiagRf refactor

This commit is contained in:
2024-07-29 17:45:16 -04:00
parent 16db20d264
commit d2a5d9e69f
4 changed files with 108 additions and 160 deletions

View File

@@ -1,134 +1,105 @@
%Diagnostic sheet called by EZvInitLoad.m, EZexpSel.m ?EZinteractDev_.m?
%EZdiagRFsSheet.m
try %Try the whole routine
global Exp
if strcmp(Exp(expN).DexpType,'multi')||...
strcmp(Exp(expN).DexpType,'chrono')
DexpN=n;
end
rnames=[];
data=[];
try
cnames= {'RF Name','Median','Mean','STD','Minimum','Maximum'};
rCnt=0;
RFfilename= fullfile(Exp(expN).Dexp(DexpN).resDir,'PrintResults','!RFsDiagnostics.txt');
fid = fopen(RFfilename,'w'); %('RFdiagnostic.txt','w');
ftitle= strcat(ExpPath,':::Reference Diagnostic Values');
try
fprintf(fid,'%s\n',ftitle);
catch mErr
errorMessage= mErr.message
msg= 'Check Permissions of PrintResult folder. !RFsDiagnostics.txt may not be created';
warning((msg));
warndlg('Check Permissions of PrintResult folder. !RFsDiagnostics.txt may not be created');
end
fprintf(fid,'%s\t %s\t %s\t %s\t %s\t %s','RF Name','Median','Mean','STD','Min','Max');
fprintf(fid,'\n');
rnames= cell(1,1);
for d=1:DMnum
try
%RF1 MasterPlate Stats
RFmd1LB= Exp(expN).Dexp(DexpN).RFmd1LB(d);
mval1= Exp(expN).Dexp(DexpN).RFmd1val(d);
mean1= Exp(expN).Dexp(DexpN).mean1(d);
std1= Exp(expN).Dexp(DexpN).std1(d);
min1= Exp(expN).Dexp(DexpN).min1(d);
max1= Exp(expN).Dexp(DexpN).max1(d);
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t', cell2mat(RFmd1LB), mval1,mean1,std1,min1,max1)
fprintf(fid,'\n')
rCnt=rCnt+1;
data(rCnt,1:5)= [mval1,mean1,std1,min1,max1];
rnames(rCnt)= RFmd1LB;
catch mErr
message= 'No RF1 MasterPlate'
end
try
%RF2 MasterPlate Stats
RFmd2LB= Exp(expN).Dexp(DexpN).RFmd2LB(d);
mval2= Exp(expN).Dexp(DexpN).RFmd2val(d);
mean2= Exp(expN).Dexp(DexpN).mean2(d);
std2= Exp(expN).Dexp(DexpN).std2(d);
min2= Exp(expN).Dexp(DexpN).min2(d);
max2= Exp(expN).Dexp(DexpN).max2(d);
try %Try the whole routine
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t', cell2mat(RFmd2LB),mval2,mean2,std2,min2,max2)
fprintf(fid,'\n')
rCnt=rCnt+1;
data(rCnt,1:5)= [mval2,mean2,std2,min2,max2];
rnames(rCnt)= RFmd2LB;
catch ME
message= 'No RF2 MasterPlate'
if strcmp(Exp(expN).DexpType,'multi') ||...
strcmp(Exp(expN).DexpType,'chrono')
DexpN=n;
end
%Distributed Global stats
rnames=[];
data=[];
try
RFmdGLB= Exp(expN).Dexp(DexpN).RFmdGLB(d);
mvalsDG= Exp(expN).Dexp(DexpN).RFmedianG(d);
RFmeanG= Exp(expN).Dexp(DexpN).RFmeanG(d);
RFstdG= Exp(expN).Dexp(DexpN).RFstdG(d);
maxG= Exp(expN).Dexp(DexpN).RFmaxG(d);
minG= Exp(expN).Dexp(DexpN).RFminG(d);
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t', cell2mat(RFmdGLB),mvalsDG,RFmeanG,RFstdG,minG,maxG)
fprintf(fid,'\n')
rCnt=rCnt+1;
data(rCnt,1:5)= [mvalsDG,RFmeanG,RFstdG,minG,maxG];
rnames(rCnt)= RFmdGLB;
catch ME
message= 'No RF2 MasterPlate'
end
end %for d=1:DMnum
%Distributed RF1 Plates Stats Print
%
try
for d=1:DMnum
for mm=1:length(dMPs)
%RFmd1posD= Exp(expN).Dexp(DexpN).RFmdPindx(d,dMPs(mm));
%dMP= Exp(expN).Dexp(DexpN).RFmdPpltN(d,dMPs(mm)); %This is a storage of the MasterPlate used NOT the ScanPlate? WeMight wish to store the ScanPlateNumber also???
%rf1scNdisp= Exp(expN).Dexp(DexpN).RFmdPscanN(d,dMPs(mm));
RFmdPLB= Exp(expN).Dexp(DexpN).RFmdPLB(d,dMPs(mm));
mval1Disp= Exp(expN).Dexp(DexpN).RFmedianP(d,dMPs(mm));
mean1Disp= Exp(expN).Dexp(DexpN).meanP(d,dMPs(mm));
std1Disp= Exp(expN).Dexp(DexpN).stdP(d,dMPs(mm));
minDisp= Exp(expN).Dexp(DexpN).minP(d,dMPs(mm));
maxDisp= Exp(expN).Dexp(DexpN).maxP(d,dMPs(mm));
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t', cell2mat(RFmdPLB),mval1Disp,mean1Disp,std1Disp,minDisp,maxDisp);
fprintf(fid,'\n');
rCnt=rCnt+1;
data(rCnt,1:5)= [mval1Disp,mean1Disp,std1Disp,minDisp,maxDisp];
rnames(rCnt)= RFmdPLB; %cell2mat(RFmdPLB);
end %for mm=1:length(dMPs)
end %for d=1:DMnum
catch ME
message= 'No Distributed RF1 MasterPlates'
end
cnames={'RF Name','Median','Mean','STD','Minimum','Maximum'};
rCnt=0;
RFfilename= fullfile(Exp(expN).Dexp(DexpN).resDir,'PrintResults','!RFsDiagnostics.txt');
fid = fopen(RFfilename,'w'); %('RFdiagnostic.txt','w');
ftitle= strcat(ExpPath,':::Reference Diagnostic Values');
try
fprintf(fid,'%s\n',ftitle);
catch mErr
errorMessage=mErr.message
msg='Check Permissions of PrintResult folder. !RFsDiagnostics.txt may not be created';
warning((msg));
warndlg('Check Permissions of PrintResult folder. !RFsDiagnostics.txt may not be created');
end
fprintf(fid,'%s\t %s\t %s\t %s\t %s\t %s','RF Name','Median','Mean','STD','Min','Max');
fprintf(fid,'\n');
catch
rnames= cell(1,1);
for d=1:DMnum
try
% RF1 MasterPlate Stats
RFmd1LB=Exp(expN).Dexp(DexpN).RFmd1LB(d);
mval1=Exp(expN).Dexp(DexpN).RFmd1val(d);
mean1=Exp(expN).Dexp(DexpN).mean1(d);
std1=Exp(expN).Dexp(DexpN).std1(d);
min1=Exp(expN).Dexp(DexpN).min1(d);
max1=Exp(expN).Dexp(DexpN).max1(d);
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t\n',...
cell2mat(RFmd1LB), mval1,mean1,std1,min1,max1)
rCnt=rCnt+1;
data(rCnt,1:5)=[mval1,mean1,std1,min1,max1];
rnames(rCnt)=RFmd1LB;
catch
message='No RF1 MasterPlate'
end
try
% RF2 MasterPlate Stats
RFmd2LB=Exp(expN).Dexp(DexpN).RFmd2LB(d);
mval2=Exp(expN).Dexp(DexpN).RFmd2val(d);
mean2=Exp(expN).Dexp(DexpN).mean2(d);
std2=Exp(expN).Dexp(DexpN).std2(d);
min2=Exp(expN).Dexp(DexpN).min2(d);
max2=Exp(expN).Dexp(DexpN).max2(d);
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t\n', cell2mat(RFmd2LB),mval2,mean2,std2,min2,max2)
rCnt=rCnt+1;
data(rCnt,1:5)= [mval2,mean2,std2,min2,max2];
rnames(rCnt)= RFmd2LB;
catch
message='No RF2 MasterPlate'
end
% Distributed Global stats
try
RFmdGLB=Exp(expN).Dexp(DexpN).RFmdGLB(d);
mvalsDG=Exp(expN).Dexp(DexpN).RFmedianG(d);
RFmeanG=Exp(expN).Dexp(DexpN).RFmeanG(d);
RFstdG=Exp(expN).Dexp(DexpN).RFstdG(d);
maxG=Exp(expN).Dexp(DexpN).RFmaxG(d);
minG=Exp(expN).Dexp(DexpN).RFminG(d);
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t\n', cell2mat(RFmdGLB),mvalsDG,RFmeanG,RFstdG,minG,maxG)
rCnt=rCnt+1;
data(rCnt,1:5)=[mvalsDG,RFmeanG,RFstdG,minG,maxG];
rnames(rCnt)=RFmdGLB;
catch
message='No RF2 MasterPlate'
end
end
% Distributed RF1 Plates Stats Print
try
for d=1:DMnum
for mm=1:length(dMPs)
% RFmd1posD= Exp(expN).Dexp(DexpN).RFmdPindx(d,dMPs(mm));
% dMP= Exp(expN).Dexp(DexpN).RFmdPpltN(d,dMPs(mm)); %This is a storage of the MasterPlate used NOT the ScanPlate? WeMight wish to store the ScanPlateNumber also???
% rf1scNdisp= Exp(expN).Dexp(DexpN).RFmdPscanN(d,dMPs(mm));
RFmdPLB=Exp(expN).Dexp(DexpN).RFmdPLB(d,dMPs(mm));
mval1Disp=Exp(expN).Dexp(DexpN).RFmedianP(d,dMPs(mm));
mean1Disp=Exp(expN).Dexp(DexpN).meanP(d,dMPs(mm));
std1Disp=Exp(expN).Dexp(DexpN).stdP(d,dMPs(mm));
minDisp=Exp(expN).Dexp(DexpN).minP(d,dMPs(mm));
maxDisp=Exp(expN).Dexp(DexpN).maxP(d,dMPs(mm));
fprintf(fid,'%s\t %7.2f\t %7.4f\t %7.4f\t %7.4f\t %7.4f\t\n', cell2mat(RFmdPLB),mval1Disp,mean1Disp,std1Disp,minDisp,maxDisp);
rCnt=rCnt+1;
data(rCnt,1:5)= [mval1Disp,mean1Disp,std1Disp,minDisp,maxDisp];
rnames(rCnt)= RFmdPLB;
end
end
catch
message='No Distributed RF1 MasterPlates'
end
catch
Warndlg('Problem writing the RFdiagnosticSheet.txt file')
end
fclose(fid)
end
fclose(fid)
catch
msg= 'EZdiagRFsSheet.m failed. Check Permissions'
msg='EZdiagRFsSheet.m failed. Check Permissions'
end
%{
mErr
message= mErr.stack(end).line
error_line = mErr.stack(end).line
%}