max_min.m

来自「利用传输矩阵法计算光纤啁啾brag光纤光栅滤波器的温度滤波特性」· M 代码 · 共 24 行

%
% [最大值，对应序号，最小值，对应序号，均值，最大值偏差，最小值偏差]
%
function [max,j1,min,j2,average,max_deviation,min_deviation]=max(s)
  l=length(s);
  max=0;
  min=1;
  j1=0;
  j2=0;
  average=0;
  for i=1:l
      if (s(i)>max)
          j1=i;
          max=s(i);
      end
      if (s(i)<min)
          j2=i;
          min=s(i);
      end
      average=average+s(i);      
  end
  average=average/127;
  max_deviation=10*log(max/average);
  min_deviation=-10*log(min/average);