Format NCsingleDisplay.m
This commit is contained in:
@@ -6,27 +6,19 @@ global scan
|
|||||||
|
|
||||||
eDir=ExpPath;
|
eDir=ExpPath;
|
||||||
hf=figure;
|
hf=figure;
|
||||||
%**************Parameter Entry******************
|
% Parameter Entry
|
||||||
[scLst, row, col]=NCdisplayGui(eDir); %(ExpPath); %Ncode 122111replaced removed ,numOfPrtTimes)
|
[scLst, row, col]=NCdisplayGui(eDir); %(ExpPath); %Ncode 122111replaced removed ,numOfPrtTimes)
|
||||||
%***********************************************
|
|
||||||
|
|
||||||
close(hf)
|
close(hf)
|
||||||
|
|
||||||
|
|
||||||
selSpot=(row-1)*24 + col;
|
selSpot=(row-1)*24 + col;
|
||||||
for iPlate=1:length(scLst)
|
for iPlate=1:length(scLst)
|
||||||
scanPltNum=str2double(scLst(iPlate));
|
scanPltNum=str2double(scLst(iPlate));
|
||||||
%scanPltNum(iPlate);
|
|
||||||
%-----------------------------------------------------------------------
|
|
||||||
K=scan(scanPltNum).plate(1).CFout((selSpot),3);
|
K=scan(scanPltNum).plate(1).CFout((selSpot),3);
|
||||||
r=scan(scanPltNum).plate(1).CFout((selSpot),4);
|
r=scan(scanPltNum).plate(1).CFout((selSpot),4);
|
||||||
l=scan(scanPltNum).plate(1).CFout((selSpot),5);
|
l=scan(scanPltNum).plate(1).CFout((selSpot),5);
|
||||||
|
|
||||||
suffix=strcat('Scan-Plate', scLst(iPlate)); % char(QspLst(n));
|
suffix=strcat('Scan-Plate', scLst(iPlate)); % char(QspLst(n));
|
||||||
% fileSpotSuffix=strcat('-Spot#',num2str(selSpot),'-Row=',selSpotRC(1),'-Col=',selSpotRC(2),'-FitData','-L=',num2str(l),'-r=',num2str(r),'-K=',num2str(K));
|
% fileSpotSuffix=strcat('-Spot#',num2str(selSpot),'-Row=',selSpotRC(1),'-Col=',selSpotRC(2),'-FitData','-L=',num2str(l),'-r=',num2str(r),'-K=',num2str(K));
|
||||||
fileSpotSuffix=strcat('-Spot#',num2str(selSpot),'-Row=',num2str(row),'-Col=',num2str(col),'-FitData','-L=',num2str(l),'-r=',num2str(r),'-K=',num2str(K));
|
fileSpotSuffix=strcat('-Spot#',num2str(selSpot),'-Row=',num2str(row),'-Col=',num2str(col),'-FitData','-L=',num2str(l),'-r=',num2str(r),'-K=',num2str(K));
|
||||||
filenameNoExt=[suffix fileSpotSuffix];
|
filenameNoExt=[suffix fileSpotSuffix];
|
||||||
|
|
||||||
timeArr=scan(scanPltNum).plate(1).tSeries;
|
timeArr=scan(scanPltNum).plate(1).tSeries;
|
||||||
rawIntens=scan(scanPltNum).plate(1).intens((selSpot),:)/scan(scanPltNum).plate(1).Ag((selSpot));
|
rawIntens=scan(scanPltNum).plate(1).intens((selSpot),:)/scan(scanPltNum).plate(1).Ag((selSpot));
|
||||||
try
|
try
|
||||||
@@ -34,8 +26,6 @@ filterTms= scan(scanPltNum).plate(1).filterTimes{(selSpot)};
|
|||||||
normInts=scan(scanPltNum).plate(1).normIntens{(selSpot)};
|
normInts=scan(scanPltNum).plate(1).normIntens{(selSpot)};
|
||||||
catch
|
catch
|
||||||
end
|
end
|
||||||
%********************************
|
|
||||||
|
|
||||||
if (exist('K','var')&& exist('r','var') && exist('l','var'))
|
if (exist('K','var')&& exist('r','var') && exist('l','var'))
|
||||||
t=(0:1:200);
|
t=(0:1:200);
|
||||||
Growth=K ./ (1 + exp(-r.* (t - l )));
|
Growth=K ./ (1 + exp(-r.* (t - l )));
|
||||||
@@ -45,7 +35,6 @@ if length(scLst)>1
|
|||||||
else
|
else
|
||||||
cla
|
cla
|
||||||
end
|
end
|
||||||
|
|
||||||
hold on
|
hold on
|
||||||
plot(timeArr,rawIntens,'g*');
|
plot(timeArr,rawIntens,'g*');
|
||||||
try
|
try
|
||||||
@@ -57,25 +46,18 @@ title(strcat(filenameNoExt,''));
|
|||||||
xlabel('Hours');
|
xlabel('Hours');
|
||||||
ylabel('Intensities Normalized by Area');
|
ylabel('Intensities Normalized by Area');
|
||||||
grid on;
|
grid on;
|
||||||
|
|
||||||
if (exist('K','var')&& exist('r','var') && exist('l','var'))
|
if (exist('K','var')&& exist('r','var') && exist('l','var'))
|
||||||
plot(t, Growth,'b-');
|
plot(t, Growth,'b-');
|
||||||
%*********Plot L on curvefit figure***********
|
% Plot L on curvefit figure
|
||||||
grL=Growth(round(l)); %growthCurve timePT for l in hours
|
grL=Growth(round(l)); %growthCurve timePT for l in hours
|
||||||
plot(l,0:grL,'-b') % to display position of l
|
plot(l,0:grL,'-b') % to display position of l
|
||||||
plot(l,grL,'^b') % to display l position on curve as an arrowhead
|
plot(l,grL,'^b') % to display l position on curve as an arrowhead
|
||||||
|
|
||||||
%***Plot Arbitrary User Entry AUC "finalTimePt"
|
% Plot Arbitrary User Entry AUC "finalTimePt"
|
||||||
% plot(finalTimePt,0,'+m')
|
% plot(finalTimePt,0,'+m')
|
||||||
% plot(0:finalTimePt,bl,'-m')
|
% plot(0:finalTimePt,bl,'-m')
|
||||||
|
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
%end %end for SWsingle display/plot figure
|
|
||||||
|
|
||||||
%############################################################
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
%Spot entry form------------------------------------------------------
|
%Spot entry form------------------------------------------------------
|
||||||
%{
|
%{
|
||||||
|
|||||||
Reference in New Issue
Block a user