diff testPrograms/testRP.m @ 38:c2204b18f4a2 tip

End nov big change

--- a/testPrograms/testRP.m	Thu Oct 06 15:43:20 2011 +0100
+++ b/testPrograms/testRP.m	Mon Nov 28 13:34:28 2011 +0000
@@ -1,5 +1,5 @@
 function testRP(BFs,MAPparamsName,paramChanges)
-% testIHC used for IHC I/O function
+% testIHC evaluates IHC I/O function
 % multiple BFs can be used but only one is easier to interpret.
 % e.g. testRP(1000,'Normal',{});
 
@@ -18,6 +18,12 @@
 if nargin<3
     paramChanges=[]; 
 end
+if nargin<2
+    MAPparamsName='Normal';
+end
+if nargin<3
+    BFs=800; 
+end
 
 levels=-20:10:100;
 nLevels=length(levels);
@@ -133,10 +139,10 @@
     subplot(2,2,2)
     restingIHC_cilia=IHCrestingCiliaCond;
     plot(levels, IHC_cilia_peak,'k', 'linewidth',2), hold on
-    plot(levels, IHC_cilia_min,'r', 'linewidth',2)
-    hold on,
-    plot([min(levels) max(levels)], ...
-        [restingIHC_cilia restingIHC_cilia], 'g')
+%     plot(levels, IHC_cilia_min,'r', 'linewidth',2)
+%     hold on,
+%     plot([min(levels) max(levels)], ...
+%         [restingIHC_cilia restingIHC_cilia], 'g')
     title(' IHC apical cond.')
     ylabel ('IHCcilia(conductance)'), xlabel('dB SPL')
     xlim([min(levels) max(levels)])