function colicin_activity_system(GFP, OD, mCherry, anz, time) for i=1:1:anz start = (i-1)*8+1; e = i*8; GFP_sub=GFP(start:end, 1:12); OD_sub=OD((i-1)*8+1:i*8, 1:12); mCherry_sub=mCherry((i-1)*8+1:i*8, 1:12); [mCherry_out(:,:,i), GFP_out(:,:,i), OD_out(:,:,i), mCherry_err_out(:,:,i), GFP_err_out(:,:,i), OD_err_out(:,:,i)]=one_plate_colicin(GFP_sub, OD_sub, mCherry_sub); end figure hold all for l=1:1:2 for k=1:1:4 for j=1:1:anz lysis_GFP((l-1)*4+k,j)=GFP_out(l,k,j); end plot(time(:,1),lysis_GFP((l-1)*4+k,:), 'LineWidth', 2); end end legend('P:K 1:4', 'P:K 1:1', 'P:K 5:1', 'P:K 10:1', 'P:K 25:1', 'P:K 50:1', 'P:K 100:1', 'Location','NorthOutside'); % legend('ColE1-Receiver c(AHL) = 0 M', 'ColE1-Receiver c(AHL) = 1 nM', 'ColE1-Receiver c(AHL) = 25 nM', 'Reference-Receiver c(AHL) = 0 M', 'Reference-Receiver c(AHL) = 1 nM', 'Reference-Receiver c(AHL) = 25 nM', 'Location', 'NorthOutside'); xlabel('time [h]'); ylabel('GFP intensity - Killer cells'); title('Lysis test') hold off figure hold all for l=1:1:4 for k=1:1:4 for j=1:1:anz lysis_GFP((l-1)*4+k,j)=OD_out(k,8+l,j); end end end plot(time(:,1),lysis_GFP(1,:), 'LineWidth', 2); plot(time(:,1),lysis_GFP(2,:), 'LineWidth', 2); plot(time(:,1),lysis_GFP(5,:), 'LineWidth', 2); plot(time(:,1),lysis_GFP(9,:), 'LineWidth', 2); plot(time(:,1),lysis_GFP(14,:), 'LineWidth', 2); plot(time(:,1),lysis_GFP(15,:), 'LineWidth', 2); legend('5 nM', '6 nM','7 nM', '8 nM','9 nM', '10 nM','25 nM', '50 nM','NorthOutside'); % legend('ColE1-Receiver c(AHL) = 0 M', 'ColE1-Receiver c(AHL) = 1 nM', 'ColE1-Receiver c(AHL) = 25 nM', 'Reference-Receiver c(AHL) = 0 M', 'Reference-Receiver c(AHL) = 1 nM', 'Reference-Receiver c(AHL) = 25 nM', 'Location', 'NorthOutside'); xlabel('time [h]'); ylabel('OD'); title('Lysis test - Reference') hold off end