Commit b7831cf1aab6c12dd8746395ef536193c69639fe
1 parent
267f6d3228
Exists in
master
use -text instead of -ascii in save command
Showing 4 changed files with 4 additions and 4 deletions Inline Diff
allanplot.m
#!/usr/bin/octave-cli --persist | 1 | 1 | #!/usr/bin/octave-cli --persist | |
2 | 2 | |||
# allanplot.m computes Allan deviation from temporal dataset | 3 | 3 | # allanplot.m computes Allan deviation from temporal dataset | |
# | 4 | 4 | # | |
# use : allanplot.m file.dat column_i gain_i ad_opt | 5 | 5 | # use : allanplot.m file.dat column_i gain_i ad_opt | |
# allanplot.m file.dat [column_i,column_j] [gain_i,gain_j] [ad_opt_i,ad_opt_j] | 6 | 6 | # allanplot.m file.dat [column_i,column_j] [gain_i,gain_j] [ad_opt_i,ad_opt_j] | |
# | 7 | 7 | # | |
# inputs: | 8 | 8 | # inputs: | |
# file.dat : [string] file to load | 9 | 9 | # file.dat : [string] file to load | |
# columns : int or [int] columns to load | 10 | 10 | # columns : int or [int] columns to load | |
# fs : int or [int] sampling frequency | 11 | 11 | # fs : int or [int] sampling frequency | |
# gains : float or [float] gains to apply | 12 | 12 | # gains : float or [float] gains to apply | |
# ad_opt : int or [int] ad options : | 13 | 13 | # ad_opt : int or [int] ad options : | |
# 0 direct allan computation | 14 | 14 | # 0 direct allan computation | |
# 1 drift removed ad | 15 | 15 | # 1 drift removed ad | |
# 2 relative ad | 16 | 16 | # 2 relative ad | |
# 3 relative drift removed ad | 17 | 17 | # 3 relative drift removed ad | |
# arg_save : [int] save adev with one file per column : | 18 | 18 | # arg_save : [int] save adev with one file per column : | |
# 0 without save | 19 | 19 | # 0 without save | |
# 1 save adev result to file-col.sig | 20 | 20 | # 1 save adev result to file-col.sig | |
21 | 21 | |||
filename = argv(){1}; | 22 | 22 | filename = argv(){1}; | |
col = eval(argv(){2}); | 23 | 23 | col = eval(argv(){2}); | |
fs = eval(argv(){3}); | 24 | 24 | fs = eval(argv(){3}); | |
mult = eval(argv(){4}); | 25 | 25 | mult = eval(argv(){4}); | |
ad_opt = eval(argv(){5}); | 26 | 26 | ad_opt = eval(argv(){5}); | |
arg_save = eval(argv(){6}); | 27 | 27 | arg_save = eval(argv(){6}); | |
28 | 28 | |||
if length(col) == length(mult) | 29 | 29 | if length(col) == length(mult) | |
figure | 30 | 30 | figure | |
hold all | 31 | 31 | hold all | |
grid on | 32 | 32 | grid on | |
cc = 'bkcgmry'; | 33 | 33 | cc = 'bkcgmry'; | |
for i = [1:length(col)] | 34 | 34 | for i = [1:length(col)] | |
data.freq = load(filename)(:,col(i)).*mult(i); | 35 | 35 | data.freq = load(filename)(:,col(i)).*mult(i); | |
if ad_opt(i) == 1 | 36 | 36 | if ad_opt(i) == 1 | |
printf(strcat(filename, ' col', num2str(col(i)), ' drift removed\n\n')) | 37 | 37 | printf(strcat(filename, ' col', num2str(col(i)), ' drift removed\n\n')) | |
data.freq = detrend(data.freq); | 38 | 38 | data.freq = detrend(data.freq); | |
elseif ad_opt(i) == 2 | 39 | 39 | elseif ad_opt(i) == 2 | |
printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '\n\n')) | 40 | 40 | printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '\n\n')) | |
data.freq = data.freq./mean(data.freq); | 41 | 41 | data.freq = data.freq./mean(data.freq); | |
elseif ad_opt(i) == 3 | 42 | 42 | elseif ad_opt(i) == 3 | |
printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad\n\n')) | 43 | 43 | printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad\n\n')) | |
data.freq = detrend(data.freq./mean(data.freq)); | 44 | 44 | data.freq = detrend(data.freq./mean(data.freq)); | |
end | 45 | 45 | end | |
data.rate = fs(i); | 46 | 46 | data.rate = fs(i); | |
[ad, S, err, tau] = allan(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); | 47 | 47 | [ad, S, err, tau] = allan(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')) | 48 | 48 | loglogerr(tau, ad, err, strcat(cc(mod(i, length(cc))), '-s')) | |
leg{i} = strcat(filename, ' col', num2str(col(i))); | 49 | 49 | leg{i} = strcat(filename, ' col', num2str(col(i))); | |
axis(10.^ceil(log10([tau(1), tau(end)]))) | 50 | 50 | axis(10.^ceil(log10([tau(1), tau(end)]))) | |
hold on | 51 | 51 | hold on | |
if arg_save ==1 | 52 | 52 | if arg_save ==1 | |
filenameout = strcat(strsplit(filename,'.'){1},'-',num2str(col(i)),'.sig') | 53 | 53 | filenameout = strcat(strsplit(filename,'.'){1},'-',num2str(col(i)),'.sig') | |
datatosave = horzcat(tau', ad', err'); | 54 | 54 | datatosave = horzcat(tau', ad', err'); | |
save('-ascii', filenameout , 'datatosave'); | 55 | 55 | save('-text', filenameout , 'datatosave'); | |
end | 56 | 56 | end | |
end | 57 | 57 | end | |
legend(leg) | 58 | 58 | legend(leg) | |
input("Press to continue..."); | 59 | 59 | input("Press to continue..."); |
allanplot_cov.m
#!/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 | mult1 = eval(argv(){4}); | |
mult2 = eval(argv(){5}); | 7 | 7 | mult2 = eval(argv(){5}); | |
arg_save = eval(argv(){6}); | 8 | 8 | arg_save = eval(argv(){6}); | |
9 | 9 | |||
if length(col1) == length(mult1) | 10 | 10 | if length(col1) == length(mult1) | |
figure | 11 | 11 | figure | |
hold all | 12 | 12 | hold all | |
grid on | 13 | 13 | grid on | |
cc = 'bkcgmry'; | 14 | 14 | cc = 'bkcgmry'; | |
for i = [1:length(col1)] | 15 | 15 | for i = [1:length(col1)] | |
data.freq = load(filename)(:,col1(i)).*mult1(i); | 16 | 16 | data.freq = load(filename)(:,col1(i)).*mult1(i); | |
data.freq2 = load(filename)(:,col2(i)).*mult2(i); | 17 | 17 | data.freq2 = load(filename)(:,col2(i)).*mult2(i); | |
data.freq = data.freq(1:min(length(data.freq), length(data.freq2))); | 18 | 18 | 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 | 19 | data.freq2 = data.freq2(1:min(length(data.freq), length(data.freq2))); | |
if eval(argv(){end-1}) == 1 | 20 | 20 | if eval(argv(){end-1}) == 1 | |
printf('\ndata1 drift removed\n\n') | 21 | 21 | printf('\ndata1 drift removed\n\n') | |
data.freq = detrend(data.freq); | 22 | 22 | data.freq = detrend(data.freq); | |
end | 23 | 23 | end | |
if eval(argv(){end}) == 1 | 24 | 24 | if eval(argv(){end}) == 1 | |
printf('\ndata2 drift removed\n\n') | 25 | 25 | printf('\ndata2 drift removed\n\n') | |
data.freq2 = detrend(data.freq2); | 26 | 26 | data.freq2 = detrend(data.freq2); | |
end | 27 | 27 | end | |
data.rate = 1; | 28 | 28 | data.rate = 1; | |
[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 | 29 | [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 | 30 | 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 | 31 | leg{i} = strcat(filename, ' cov col', num2str(col1(i)), ' col', num2str(col2(i))); | |
axis(10.^ceil(log10([tau(1), tau(end)]))) | 32 | 32 | axis(10.^ceil(log10([tau(1), tau(end)]))) | |
hold on | 33 | 33 | hold on | |
if arg_save ==1 | 34 | 34 | if arg_save ==1 | |
filenameout = strcat(strsplit(filename,'.'){1},'-cov-',num2str(col1),num2str(col2),'.sig') | 35 | 35 | filenameout = strcat(strsplit(filename,'.'){1},'-cov-',num2str(col1),num2str(col2),'.sig') | |
datatosave = horzcat(tau', ad', err'); | 36 | 36 | datatosave = horzcat(tau', ad', err'); | |
save('-ascii', filenameout , 'datatosave'); | 37 | 37 | save('-text', filenameout , 'datatosave'); | |
end | 38 | 38 | end | |
end | 39 | 39 | end | |
legend(leg) | 40 | 40 | legend(leg) | |
input("Press to continue..."); | 41 | 41 | input("Press to continue..."); | |
end | 42 | 42 | end |
temp2allan.m
#!/usr/bin/octave-cli | 1 | 1 | #!/usr/bin/octave-cli | |
2 | 2 | |||
filename = argv(){1}; | 3 | 3 | filename = argv(){1}; | |
col = eval(argv(){2}); | 4 | 4 | col = eval(argv(){2}); | |
mult = eval(argv(){3}); | 5 | 5 | mult = eval(argv(){3}); | |
6 | 6 | |||
filename = argv(){1}; | 7 | 7 | filename = argv(){1}; | |
col = eval(argv(){2}); | 8 | 8 | col = eval(argv(){2}); | |
mult = eval(argv(){3}); | 9 | 9 | mult = eval(argv(){3}); | |
ad_opt = eval(argv(){4}); | 10 | 10 | ad_opt = eval(argv(){4}); | |
11 | 11 | |||
if length(col) == length(mult) | 12 | 12 | if length(col) == length(mult) | |
for i = [1:length(col)] | 13 | 13 | for i = [1:length(col)] | |
data.freq = load(filename)(:,col(i)).*mult(i); | 14 | 14 | data.freq = load(filename)(:,col(i)).*mult(i); | |
if ad_opt(i) == 1 | 15 | 15 | if ad_opt(i) == 1 | |
printf(strcat(filename, ' col', num2str(col(i)), ' drift removed\n\n')) | 16 | 16 | printf(strcat(filename, ' col', num2str(col(i)), ' drift removed\n\n')) | |
data.freq = detrend(data.freq); | 17 | 17 | data.freq = detrend(data.freq); | |
elseif ad_opt(i) == 2 | 18 | 18 | elseif ad_opt(i) == 2 | |
printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '\n\n')) | 19 | 19 | printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '\n\n')) | |
data.freq = data.freq./mean(data.freq); | 20 | 20 | data.freq = data.freq./mean(data.freq); | |
elseif ad_opt(i) == 3 | 21 | 21 | elseif ad_opt(i) == 3 | |
printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad\n\n')) | 22 | 22 | printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad\n\n')) | |
data.freq = detrend(data.freq./mean(data.freq)); | 23 | 23 | data.freq = detrend(data.freq./mean(data.freq)); | |
end | 24 | 24 | end | |
data.rate = 1; | 25 | 25 | data.rate = 1; | |
[ad, S, err, tau] = allan(data, 2.^[0:nextpow2(length(data.freq))-3]./data.rate, strcat(strsplit(filename, '/'){end}, num2str(i)), 0); | 26 | 26 | [ad, S, err, tau] = allan(data, 2.^[0:nextpow2(length(data.freq))-3]./data.rate, strcat(strsplit(filename, '/'){end}, num2str(i)), 0); | |
ad_tosave{i} = vertcat(ad, err)'; | 27 | 27 | ad_tosave{i} = vertcat(ad, err)'; | |
end | 28 | 28 | end | |
tosave = tau'; | 29 | 29 | tosave = tau'; | |
for i = [1:length(col)] | 30 | 30 | for i = [1:length(col)] | |
tosave = horzcat(tosave, ad_tosave{i}); | 31 | 31 | tosave = horzcat(tosave, ad_tosave{i}); | |
end | 32 | 32 | end |
temp2oallan.m
#!/usr/bin/octave-cli | 1 | 1 | #!/usr/bin/octave-cli | |
2 | 2 | |||
filename = argv(){1}; | 3 | 3 | filename = argv(){1}; | |
col = eval(argv(){2}); | 4 | 4 | col = eval(argv(){2}); | |
mult = eval(argv(){3}); | 5 | 5 | mult = eval(argv(){3}); | |
6 | 6 | |||
filename = argv(){1}; | 7 | 7 | filename = argv(){1}; | |
col = eval(argv(){2}); | 8 | 8 | col = eval(argv(){2}); | |
mult = eval(argv(){3}); | 9 | 9 | mult = eval(argv(){3}); | |
ad_opt = eval(argv(){4}); | 10 | 10 | ad_opt = eval(argv(){4}); | |
11 | 11 | |||
if length(col) == length(mult) | 12 | 12 | if length(col) == length(mult) | |
for i = [1:length(col)] | 13 | 13 | for i = [1:length(col)] | |
data.freq = load(filename)(:,col(i)).*mult(i); | 14 | 14 | data.freq = load(filename)(:,col(i)).*mult(i); | |
if nargin == 4 | 15 | 15 | if nargin == 4 | |
if ad_opt(i) == 1 | 16 | 16 | if ad_opt(i) == 1 | |
printf(strcat(filename, ' col', num2str(col(i)), ' drift removed\n\n')) | 17 | 17 | printf(strcat(filename, ' col', num2str(col(i)), ' drift removed\n\n')) | |
data.freq = detrend(data.freq); | 18 | 18 | data.freq = detrend(data.freq); | |
elseif ad_opt(i) == 2 | 19 | 19 | elseif ad_opt(i) == 2 | |
printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '\n\n')) | 20 | 20 | printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '\n\n')) | |
data.freq = data.freq./mean(data.freq); | 21 | 21 | data.freq = data.freq./mean(data.freq); | |
elseif ad_opt(i) == 3 | 22 | 22 | elseif ad_opt(i) == 3 | |
printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad\n\n')) | 23 | 23 | printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad\n\n')) | |
data.freq = detrend(data.freq./mean(data.freq)); | 24 | 24 | data.freq = detrend(data.freq./mean(data.freq)); | |
end | 25 | 25 | end | |
endif | 26 | 26 | endif | |
data.rate = 1; | 27 | 27 | data.rate = 1; | |
[ad, S, err, tau] = allan_overlap(data, 2.^[0:nextpow2(length(data.freq))-3]./data.rate, strcat(strsplit(filename, '/'){end}, num2str(i)), 0); | 28 | 28 | [ad, S, err, tau] = allan_overlap(data, 2.^[0:nextpow2(length(data.freq))-3]./data.rate, strcat(strsplit(filename, '/'){end}, num2str(i)), 0); | |
ad_tosave{i} = vertcat(ad, err)'; | 29 | 29 | ad_tosave{i} = vertcat(ad, err)'; | |
end | 30 | 30 | end | |
tosave = tau'; | 31 | 31 | tosave = tau'; | |
for i = [1:length(col)] | 32 | 32 | for i = [1:length(col)] | |
tosave = horzcat(tosave, ad_tosave{i}); | 33 | 33 | tosave = horzcat(tosave, ad_tosave{i}); | |
end | 34 | 34 | end |