Blame view

allanplot.m 1.78 KB
b197c3fdf   bmarechal   first commit
1
  #!/usr/bin/octave-cli --persist
54ec4ada0   bmarechal   add help header
2
3
4
5
6
7
8
9
  # allanplot.m computes Allan deviation from temporal dataset
  #
  # 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]
  #
  # inputs:
  #	file.dat : [string]			file to load
  #	columns : int or [int]		columns to load
b25b94030   bmarechal   add fs arg and re...
10
  #	fs : int or [int]			sampling frequency
54ec4ada0   bmarechal   add help header
11
12
13
14
15
16
  #	gains : float or [float]	gains to apply
  #	ad_opt : int or [int]		ad options :
  #										0 direct allan computation
  #										1 drift removed ad
  #										2 relative ad
  #										3 relative drift removed ad
b197c3fdf   bmarechal   first commit
17
18
  filename = argv(){1};
  col = eval(argv(){2});
b25b94030   bmarechal   add fs arg and re...
19
20
21
  fs = eval(argv(){3});
  mult = eval(argv(){4});
  ad_opt = eval(argv(){5});
b197c3fdf   bmarechal   first commit
22

2f13b7356   bmarechal   add multiple colu...
23
  if length(col) == length(mult)
1a0e88f0c   bmarechal   replace 4-spaces ...
24
25
26
27
28
29
  	figure
  	hold all
  	grid on
  	cc = 'bkcgmry';
  	for i = [1:length(col)]
  		data.freq = load(filename)(:,col(i)).*mult(i);
7420f56d6   bmarechal   add sample time arg
30
  		if nargin == 5
54ec4ada0   bmarechal   add help header
31
  			if ad_opt(i) == 1
1a0e88f0c   bmarechal   replace 4-spaces ...
32
33
34
35
  				printf(strcat(filename, ' col', num2str(col(i)), ' drift removed
  
  '))
  				data.freq = detrend(data.freq);
54ec4ada0   bmarechal   add help header
36
  			elseif ad_opt(i) == 2
4a63914c1   bmarechal   add relative ad o...
37
38
39
  				printf(strcat(filename, ' col', num2str(col(i)), ' relative ad : mean=', num2str(mean(data.freq)), '
  
  '))
b25b94030   bmarechal   add fs arg and re...
40
41
42
43
44
45
  				data.freq = data.freq./mean(data.freq);
  			elseif ad_opt(i) == 3
  				printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad
  
  '))
  				data.freq = detrend(data.freq./mean(data.freq));
1a0e88f0c   bmarechal   replace 4-spaces ...
46
47
  			end
  		endif
b25b94030   bmarechal   add fs arg and re...
48
  		data.rate = fs(i);
b12818783   bmarechal   use log repeated ...
49
  		[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);
1a0e88f0c   bmarechal   replace 4-spaces ...
50
51
52
53
54
55
56
  		loglogerr(tau, ad, err, strcat(cc(mod(i, length(cc))), '-s'))
  		leg{i} = strcat(filename, ' col', num2str(col(i)));
  		axis(10.^ceil(log10([tau(1), tau(end)])))
  		hold on
  	end
  	legend(leg)
  	input("Press to continue...");
2f13b7356   bmarechal   add multiple colu...
57
  end
b197c3fdf   bmarechal   first commit
58
  exit