7楼: Originally posted by 月只蓝 at 2015-08-12 12:33:10
你要求解的方程，到底是  “tan（k*L）=（k*L)/[1+N/(N-1)^2*(k*L)^2 ” 还是你给出的图片中的 “tan（k*L）=N/[1+N/(N-1)^2*(k*L)^2 ”？
我给出的代码是针对图片中方程的。...

>> n=1.5;
>> [x fval]=fsolve(@(x) tan(x)-  n/(1+x^2*n/((n-1)^2)  ),0)

2楼: Originally posted by 月只蓝 at 2015-08-12 11:25:56
程序中以x表示k*L，由于你没有给出N的数值，我就以n=1.5为例，代码如下：
>> n=1.5;
>> =fsolve(@(x) tan(x)-  n/(1+x^2*n/((n-1)^2)  ),0)

计算结果：
解x =

    0.5198


方程残差fval = ...

3楼: Originally posted by Fanny675 at 2015-08-12 12:14:44
你把方程弄错了，丢掉了（k*L)^2...