打开EXCEL 菜单—工具—宏—宏—创建—然后在右侧新建一个"模块Module 1"—在模块下输入如下内容
Public Function inv(x As Double)
Dim IP1, OP2, R1, R2, Mate, PN, i As Double
Dim inv01, inv02 As Double
IP1 = x
R1 = 0
R2 = 90
Mate = (R2 - R1) * 0.6180339887498 + R1
For i = 1 To 1000
OP2 = Tan(Mate * 3.1415926535898 / 180) - Mate * 3.1415926535898 / 180
PN = OP2 - IP1
If PN > 0 Then
R2 = Mate
Mate = (R2 - R1) * 0.3819660112502 + R1
Else
R1 = Mate
Mate = (R2 - R1) * 0.6180339887498 + R1
End If
Next
inv = Mate
End Function
保存后关闭
2、
这样在EXCEL里面就有一个公式INV()了,用法和COS,AVERAGE等公式相同。
比如A1=8.93423000116951E-02 你想知道这个值对应的角度,那么就可以用INV(A1)知道值。
3、
反求INV是没有公式的,一般是依靠查表,但是由于计算机的计算速度快,因此一般使用黄金分割法或者牛顿迭代法来优化求解。
excel渐开线函数计算公式
找到对应的分数(“)所在行,找到对应的度数°所在列,行与列相交处即为所需查找的值。 现在可用excel 函数 编一个计算表invα=tanα+α α为弧度值。