git.gag.com Git - debian/gnuradio/blob - gr-radar-mono/src/utils/read_avg.m

   1 function avg = read_avg(name, vlen)
   2
   3     f = fopen(name, "rb");
   4     s = zeros(1, vlen);
   5     n = 0;
   6
   7     while (!feof(f))
   8        t = fread(f, [2, vlen], "float");
   9        if (size(t) == [2, vlen])
  10           n = n+1;
  11           c = t(1,:)+t(2,:)*j;
  12           if (n > 10)
  13              s = s+c;
  14           endif
  15        endif
  16     endwhile
  17
  18     avg = s/(n-1);
  19
  20     fclose(f);
  21
  22 endfunction