% FR共轭梯度法 function sixge x0=[1,0]'; [x,val,k]=frcg('fun','gfun',x0) end function f=fun(x) f=100*(x(1)^2-x(2))^2+(x(1)-1)^2; end function g=gfun(x) g=[400*x(1)*(x(1)^2-x(2))+2*(x(1)-1), -200*(x(1)^2-x(2))]'; end function [x,val,k]=frcg(fun,gfun,x0) ma
matlab 程序设计 1, for start:increment:end 若默认步长为1,则为 for start:end ———— end while condition ———— end 2,matlab 程序:M-Script M-function 后缀均为 .m 脚本文件中存储的是可用于自动重复执行的一组命令和函数组合 执行:M文件编辑器 RUN : 命令窗口的命令行提示符>>脚本文件名 脚本文件分享命令窗口中的工作区 函数文件运行在独立的工作区,一般要自带参数并返
共轭梯度法: function [ x, r, k ] = CorGrant( x0, A, b ) x = x0; r = b - A * x0; d = r; X = ones(length(x), 1); k = 0; while 1 if norm(r, Inf)<1e-6 break end k = k + 1; arf = (r' * r) / (d' * A * d); x = x + arf * d; r2 = r - arf * A * d; brt = (r2' * r2)