| Author |
Comment/Response |
Xizheng
|
 08/23/12 1:48pm
In Response To 'Re: A problem of NSolve'
---------
Thank you very much.
I hope to do the following code:
Do[Do[Print[T12, T13,
NSolve[{-(1 + T12 + T13)*x + T12*2/Pi*ArcTan[(Pi/2)*1.4*y] +
T13*2/Pi*ArcTan[(Pi/2)*1.4*z] ==
0, -(1 + T12 + 1)*y + T12*2/Pi*ArcTan[(Pi/2)*1.4*x] +
1*2/Pi*ArcTan[(Pi/2)*1.4*z] ==
0, -(1 + T13 + 1)*z + T13*2/Pi*ArcTan[(Pi/2)*1.4*x] +
1*2/Pi*ArcTan[(Pi/2)*1.4*y] == 0}, {x, y, z}, Reals]], {T12, 0,
3, 0.1}],
{T13, 0, 3, 0.1}]
But when I using FindRoot, how to rewrite that?,x,y,z all from-1 to 1.Thank you very much!!
URL: , |
|
