|
samer@20
|
1 % drumplot - Do plots for given array of tracking data
|
|
samer@20
|
2 function drumplot(BDT,varargin)
|
|
samer@20
|
3 opts=prefs('basename',[],varargin{:});
|
|
samer@20
|
4 plots=drumplots(BDT,opts);
|
|
samer@20
|
5 if isempty(opts.basename)
|
|
samer@58
|
6 plotfn=@(f,p)paperplot(f,p,'size',[8,8],opts);
|
|
samer@70
|
7 paperplot(40,@()plottrack(BDT),opts,'size',[30,5]);
|
|
samer@20
|
8 else
|
|
samer@58
|
9 plotfn=@(f,p)paperplot(f,p,'epsfile',sprintf('%s-%d.eps',opts.basename,f),'size',[8,8],opts);
|
|
samer@70
|
10 paperplot(40,@()plottrack(BDT),'epsfile',sprintf('%s-track.eps',opts.basename),opts,'size',[30,5]);
|
|
samer@20
|
11 end
|
|
samer@20
|
12 zipwith(plotfn,num2cell(40+(1:length(plots))),plots);
|
|
samer@20
|
13 end
|
