added default params for rolling ball

Author: dpfoose

fix_spectra/fix_rolling_ball_baseline.m

@@ -3,15 +3,18 @@
 %   Detailed explanation goes here
 prompt={'Enter min/max window:', 'Enter smoothing window:'};
 name='Rolling ball';
-answer = inputdlg(prompt, name, [1, 35], {'55', '35'});
+rbparams = getappdata(gcf, 'rbparams');
+if size(rbparams, 2) ~= 2
+    rbparams = {'21', '13'};
+answer = inputdlg(prompt, name, [1, 35], rbparams);
+setappdata(gcf, 'rbparams', answer);
 
 if(isempty(answer))
     return
 end
 
 wm = str2double(answer{1});
 ws = str2double(answer{2});
-
 collections = getappdata(gcf,'collections');
 for c = 1:length(collections)
     for s = 1:collections{c}.num_samples