main.m

来自「无约束优化中的共轭梯度算法程序」· M 代码 · 共 17 行

function result=main()
result1=0;
result2=0;
x=1;
y=2;
[Ntotle1,MMM,number1]=PRPSWP(x);
[Ntotle2,NNN,number2]=MPRPSWP(y);
N=max(MMM,NNN);
R1=N^(number1);
R2=N^(number2);
result1=Ntotle1*R1;
result2=Ntotle2*R2;
result=(result1/result2)^(1/49);
diary 000result.m
sprintf('%e   %e   %e',result1,result2,result)
diary off