#!/usr/bin/octave-cli --persist
  
  filename = argv(){1};
  col = eval(argv(){2});
  mult = eval(argv(){3});

  if length(col) == length(mult)

  	figure
  	hold all
  	grid on
  	cc = 'bkcgmry';
  	for i = [1:length(col)]
  		data.freq = load(filename)(:,col(i)).*mult(i);
  		if nargin == 4
  			if eval(argv(){4})(i) == 1
  				printf(strcat(filename, ' col', num2str(col(i)), ' drift removed
  
  '))
  				data.freq = detrend(data.freq);
  			elseif eval(argv(){4})(i) == 2
  				printf(strcat(filename, ' col', num2str(col(i)), ' relative ad
  
  '))
                  data.freq = data.freq./mean(data.freq);
              elseif eval(argv(){4})(i) == 3
                  printf(strcat(filename, ' col', num2str(col(i)), ' drift removed relative ad
  
  '))
                  data.freq = detrend(data.freq./mean(data.freq));
  			end
  		endif
  		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);
  		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...");

  end

  exit