% Created by colent 12/7% Copyright (C) 2007-2008 XMU 數值分析 Experiment. All rights reserved.\nAuthors: 廖綺綺(ID:04120049).% Thanks 鞠穎老師% 牛頓迭代法function  [] = Newton()format long     % 顯示多位有效數字count = 0       % 記錄迭代次數x0 = 1.5        % 用戶給的初值pause;f = x0^3-x0-1;  % 用戶給的函數ff = 3*x0^2-1;  % 用戶給的函數的導數x = x0 - f/ff   % 計算第一次迭代xprev = x0;     % xprev表示上次的迭代值pause;while abs(x - xprev) > eps*abs(x)   % eps近似為2.2e-16 若兩次的迭代相差很小，則說明已經解決問題    xprev = x;     f = xprev^3 -xprev -1;    ff = 3*xprev^2-1;    x = xprev - f/ff            count = count +1    pause;end