matlab中关于fslove的问题。

H=1.90;

lanmuda=1.55;

n1=1.55;

n2=1.67;

n3=1.50;

k0=2*pi/lanmuda;

% r1=sqrt(n^2-n1^2)*k0;

% r2=sqrt(n2^2-n^2)*k0;

% r3=sqrt(n^2-n3^2)*k0;

f = @(n)sqrt(n2^2-n^2)*k0*H-atan(sqrt(n^2-n1^2)*k0/(sqrt(n2^2-n^2)*k0))-atan(sqrt(n^2-n3^2)*k0/(sqrt(n2^2-n^2)*k0));

s= fsolve(f,1.60)

想问下， 可以把注释的部分加上吗？加上的话，改如何修改程序？式子有点长。

Answer 1

[voxena]

r1 = @(n) sqrt(n^2-n1^2)*k0;
r2 = ... ; % 同上修改
r3 = ... ; % 同上修改
f = @(n) r1(n)+r2(n)+r3(n); % 示意