|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
function f=f1(x0)
x=x0(1);
y=x0(2);
z=x0(3);
f1=x^2+y^2+z^2-1;
f2=2*x^2+y^2-4*z;
f3=3*x^2-4*y+z^2;
f=[f1 f2 f3];
function f=df1(x0)
x=x0(1);
y=x0(2);
z=x0(3);
f=[2*x 2*y 2*z
4*x 2*y -4
6*x -4 2*z];
function [x,n,data]=mulNewton(x0,tol)
if nargin==1
tol=1.0e-4;
end
x1=x0-f1(x0)/df1(x0);
n=1;
while (norm(x1-x0)>tol)
x0=x1;
x1=x0-f1(x0)/df1(x0);
n=n+1;
data(:,n)=x1;
end
x=x1;
x0=[1e10 1e10 1e10];
[x,n,data]=mulNewton(x0);
disp(x)
disp(n)
为什么求出的解为以下形式:
>> clear
new_main
NaN NaN NaN
244
希望大侠们能帮下忙~ |
评分
-
1
查看全部评分
-
|