定点迭代Mathematica

Question

这是用于定点迭代的mathematica代码。

expr={1,0,9999};
f[{i_,xi_,err_}]:=(xipp=0.2062129*(20+(2*xi))^(2/5);
  {i+1,xipp,Abs[(((xipp-xi)/(xipp))*100)]});
NestWhileList[f,expr,#[[3]]>=.05&]

如果我要证明这会收敛所有初始猜测，我会使用相同的代码并用其衍生物替换该函数吗？