|
0
|
1 function resbary_out=mz_1_out_of_k(resbary_in,k)
|
|
|
2
|
|
|
3 // extrait 1 TR sur k
|
|
|
4
|
|
|
5 if ~isfield(resbary_in,'time') | ~isfield(resbary_in,'mzdata') then
|
|
|
6 disp('fields time and/or mzdata are missing in resbary_in')
|
|
|
7 end
|
|
|
8
|
|
|
9 n=max(size(resbary_in.time));
|
|
|
10
|
|
|
11 list_to_keep=[1:k:n]
|
|
|
12
|
|
|
13 n2=max(size(list_to_keep));
|
|
|
14
|
|
|
15 resbary_out.time=resbary_in.time(list_to_keep,:);
|
|
|
16
|
|
|
17 resbary_out.mzdata=list();
|
|
|
18
|
|
|
19 for i=1:n2;
|
|
|
20 resbary_out.mzdata(i)=resbary_in.mzdata(list_to_keep(i));
|
|
|
21 end
|
|
|
22
|
|
|
23
|
|
|
24 endfunction
|
