bmarechal / octave_scripts

Download as
Browse Code ยป

Commit 76682e8cb56b59325818dff1dde8468ba8642c3d

Authored by bmarechal
1 parent b7831cf1aa
Exists in master

allanplot_cov: add detrend options

Showing 1 changed file with 9 additions and 6 deletions Inline Diff

#!/usr/bin/octave-cli --persist 1 1 #!/usr/bin/octave-cli --persist
2 2
filename = argv(){1}; 3 3 filename = argv(){1};
col1 = eval(argv(){2}); 4 4 col1 = eval(argv(){2});
col2 = eval(argv(){3}); 5 5 col2 = eval(argv(){3});
mult1 = eval(argv(){4}); 6 6 fs = eval(argv(){4});
mult2 = eval(argv(){5}); 7 7 mult1 = eval(argv(){5});
arg_save = eval(argv(){6}); 8 8 mult2 = eval(argv(){6});
9 driftRem1 = eval(argv(){7});
10 driftRem2 = eval(argv(){8});
11 arg_save = eval(argv(){9});
9 12
if length(col1) == length(mult1) 10 13 if length(col1) == length(mult1)
figure 11 14 figure
hold all 12 15 hold all
grid on 13 16 grid on
cc = 'bkcgmry'; 14 17 cc = 'bkcgmry';
for i = [1:length(col1)] 15 18 for i = [1:length(col1)]
data.freq = load(filename)(:,col1(i)).*mult1(i); 16 19 data.freq = load(filename)(:,col1(i)).*mult1(i);
data.freq2 = load(filename)(:,col2(i)).*mult2(i); 17 20 data.freq2 = load(filename)(:,col2(i)).*mult2(i);
data.freq = data.freq(1:min(length(data.freq), length(data.freq2))); 18 21 data.freq = data.freq(1:min(length(data.freq), length(data.freq2)));
data.freq2 = data.freq2(1:min(length(data.freq), length(data.freq2))); 19 22 data.freq2 = data.freq2(1:min(length(data.freq), length(data.freq2)));
if eval(argv(){end-1}) == 1 20 23 if driftRem1 == 1
printf('\ndata1 drift removed\n\n') 21 24 printf('\ndata1 drift removed\n\n')
data.freq = detrend(data.freq); 22 25 data.freq = detrend(data.freq);
end 23 26 end
if eval(argv(){end}) == 1 24 27 if driftRem2 == 1
printf('\ndata2 drift removed\n\n') 25 28 printf('\ndata2 drift removed\n\n')
data.freq2 = detrend(data.freq2); 26 29 data.freq2 = detrend(data.freq2);
end 27 30 end
data.rate = 1; 28 31 data.rate = fs(i);
[ad, S, err, tau] = allan_cov(data, horzcat(reshape([1:0.1:9]'.*10.^[0:round(log10(length(data.freq)))-1],1,[]), 10^(round(log10(length(data.freq)))-1))./data.rate, strcat(strsplit(filename, '/'){end}, num2str(i)), 0); 29 32 [ad, S, err, tau] = allan_cov(data, horzcat(reshape([1:0.1:9]'.*10.^[0:round(log10(length(data.freq)))-1],1,[]), 10^(round(log10(length(data.freq)))-1))./data.rate, strcat(strsplit(filename, '/'){end}, num2str(i)), 0);
loglogerr(tau, ad, err, strcat(cc(mod(i, length(cc))), '-s')) 30 33 loglogerr(tau, ad, err, strcat(cc(mod(i, length(cc))), '-s'))
leg{i} = strcat(filename, ' cov col', num2str(col1(i)), ' col', num2str(col2(i))); 31 34 leg{i} = strcat(filename, ' cov col', num2str(col1(i)), ' col', num2str(col2(i)));
axis(10.^ceil(log10([tau(1), tau(end)]))) 32 35 axis(10.^ceil(log10([tau(1), tau(end)])))
hold on 33 36 hold on
if arg_save ==1 34 37 if arg_save ==1
filenameout = strcat(strsplit(filename,'.'){1},'-cov-',num2str(col1),num2str(col2),'.sig') 35 38 filenameout = strcat(strsplit(filename,'.'){1},'-cov-',num2str(col1),num2str(col2),'.sig')
datatosave = horzcat(tau', ad', err'); 36 39 datatosave = horzcat(tau', ad', err');
save('-text', filenameout , 'datatosave'); 37 40 save('-text', filenameout , 'datatosave');
end 38 41 end
end 39 42 end
legend(leg) 40 43 legend(leg)
input("Press to continue..."); 41 44 input("Press to continue...");
end 42 45 end
exit 43 46 exit
44 47