fminbnd的优化问题

羽逐云

function f=H(n,a1)  
% A2 l& e% g% ~1 N; cc=23.43/180*pi;
a0=32.05*pi/180;
h=zeros(n,1);
%a1=zeros(1,n);
    t=0;
! y/ N$ Q0 ]: B' M    for k = 1: n
        b=asin(sin(c)*cos(pi*k/n));
        A=sqrt(1-(sec(a0))^2*(sin(b))^2);
$ ^6 }. F, G) @        B=sin(b)*acos(tan(a0)*tan(b));
% m3 s& k7 H1 C. [6 J        e=atan(B/A);
        h(k)=sqrt(A^2+B^2)*cos(a0+e-a1);
4 y! a% r% n. b5 m" J; A        %T(k)=k/n;
        %a1(k)=a1(k)*180/pi;
        t=t+h(k);
/ S; t6 A, ^' q, J/ l" V    end
7 x) Q; r1 _/ [* b    f=189.8325-t;
6 `& x1 H, M* }5 [2 d
, W" A0 M  m4 x# f! q7 M然后用下面程序调用，怎么老出错呢，希望高手能解答一下

n=182;
a1=fminbnd(@H,0,pi/2,[],n)
不知道哪里出错了，谢谢帮助了

吖信

报错？还是结果错了？我刚试试没报错啊~