sinm1.m

来自「高等引用数学的matlab求解的配套程序」· M 代码 · 共 6 行

      function E=sinm1(A)
      E = zeros(size(A)); F = A; k = 1;
      while norm(E+F-E,1) > 0
         E = E + F;  F = -A^2*F/((k+2)*(k+1)); k = k+2;
      end