需要在1stOpt中解变常数非线性方程组,我用了如下两种方式,但是
都没有达到我预期的效果,软件把它也当做变量去求解了,也有可能是用的方法不对,但我从手册中找不到其它方法了。我用的1stopt破解免安装1.5版。
- Parameters Bt[10^10,10^12];
- Parameters c[160,200];
- Parameters m[-0.55,0.54];
- Parameters n[-0.52,0.54];
- Parameters p[0.65,1];
- Parameters Rl;
- Constant a=-150;
- Constant b=150;
- //Constant Bx=-48030; //Bx,By,Bz是变参数,从文件中读出一行再解一次方程,对于每一组Bx,By,Bz需要求一次方程组
- //Constant By=29370;
- //Constant Bz=-19077.3;
- BatchFileModel; //法一
- VarConstant Bx="Sheet1[A1:A240]";
- VarConstant By="Sheet1[B1:B240]";
- VarConstant Bz="Sheet1[C1:C240]";
- //DataFile "D:\Mag1230.xls[Sheet1[A1:A240]]";
- //RowDataSet; //法二
- //Bx="Sheet1[A1:A240]";
- //By="Sheet1[B1:B240]";
- //Bz="Sheet1[C1:C240]";
- //EndRowDataSet;
- Function Bt*(3*(m*a+n*b+p*c)*a/Rl^5-m/Rl^3)/Bx-1=0;
- Bt*(3*(m*a+n*b+p*c)*b/Rl^5-n/Rl^3)/By-1=0;
- Bt*(3*(m*a+n*b+p*c)*c/Rl^5-p/Rl^3)/Bz-1=0;
- m^2+n^2+p^2-1=0;
- Rl-sqrt(a^2+b^2+c^2)=0;
复制代码