Hello!
I am trying to execute the following code:
n=35; T=15; g=.111;K=1/g;d=2; rbar=0.04;mubar=0; R=[1, 0; 0, 0];M=[0, 0; 0, 1];X012=0.002;X0=[0.01, X012; X012, 0.001];H=[-0.5, 0.4; 0.007, -0.008];Q=[0.06 -0.0006; -0.06, 0.006];Scheck7=0;beta=3;SIGMA=[0.006811791307233, -0.000407806990090; -0.000407806990090, 0.00039291243623];PSICURL=[0.011526035149236, 0.758273970303934; 0.013935191202735, 0.955423605940771]; S0i=zeros(n,1);S0i2=zeros(n,1);Yn0=0; Yi=zeros(n,1);S1MC=zeros(n,1);POW=zeros(n,1);SPOW=0;SPHI=0;SPSI=0;delta=0.75; PSIi = cell(1, n);PHIi=zeros(n,1);% Prameters for the symbolic sum
syms Gamma1 ikfor i=2:n; APHNEW=expm([(i-1).*H,(i-1).*(2*(Q'*Q));(i-1).*(R+M),(i-1).*(-(H'))]); APHNEW11=APHNEW(1:2,1:2); %That is good
APHNEW21=APHNEW(3:4,1:2); APHNEW12=APHNEW(1:2,3:4); APHNEW22=APHNEW(3:4,3:4); % Computation of PSIi and PHIi
BPHNEW22=inv(APHNEW22); PSIi{i}=APHNEW22\APHNEW21; M7=PSIi{i}; SPSI=SPSI+PSIi{i}; PHIi(i)=beta*(log(det(APHNEW22))+(i-1)*trace(H'))/2; S0i(i)=exp(-((rbar+mubar)*(i-1)+PHIi(i))); S0i2(i)=(-((rbar+mubar)*(i-1)+PHIi(i))); Yn0=Yn0+S0i2(i);end% i stands for iota
fun0=@(Gamma) exp(trace(1i*(THETA1*inv(eye(2)-2i*SIGMA*Gamma)*SIGMA*Gamma)))/((det(eye(2)-2i*SIGMA*Gamma))^(beta/2));fun3 = matlabFunction((exp((1i*Gamma1+delta)*Yn0)*(symsum(S0i(ik)*fun0(1i*PSIi{ik}-(Gamma1-1i*delta)*SPSI), ik, 2, n)-(K-1)*fun0(-(Gamma1-1i*delta)*SPSI)))/(1i+Gamma1));a=fun3(1)q = quadgk(fun3,0,Inf)q1= exp(-(delta*x1))*max(q/pi, 0)x = fminbnd(q1,-Inf,+Inf)
*Please see attached file***
and get the following error:
Error using sym/subsindex (line 737)Invalid indexing or function definition. When defining a function, ensure that the arguments are symbolic variables andthe body of the function is a SYM expression. When indexing, the input must be numeric, logical, or ':'.Error in fweb7 (line 51)fun3 = matlabFunction((exp((1i*Gamma1+delta)*Yn0)*(symsum(S0i(ik)*fun0(1i*PSIi{ik}-(Gamma1-1i*delta)*SPSI), ik, 2,n)-(K-1)*fun0(-(Gamma1-1i*delta)*SPSI)))/(1i+Gamma1));
Can anyone please help?
Thanks in advance.
Best Answer