?? hom_hess.m
字號:
function h=Hom_hess(x,p,J)
global homds cds
if (cds.options.SymDerivative >= 2)&&(J==1)
h = feval(homds.Hessians, 0, x, p{:});
else
for i=1:homds.nphase
x1 = x; x1(i) = x1(i)-cds.options.Increment;
x2 = x; x2(i) = x2(i)+cds.options.Increment;
h(:,:,i) = hetjac(x2,p,J)-hetjac(x1,p,J);
end
h = h/(2*cds.options.Increment);
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -