Math 如何将复数的对数计算到除';e';?
我从正在进行的一个项目中切掉了一点VB6:Math 如何将复数的对数计算到除';e';?,math,vb6,logarithm,complex-numbers,mixed-radix,Math,Vb6,Logarithm,Complex Numbers,Mixed Radix,我从正在进行的一个项目中切掉了一点VB6: Public Function C_Ln(c As ComplexNumber) As ComplexNumber Set C_Ln = toComplex(Log(C_Abs(c)), Atan2(c.Imag, c.Real)) End Function VB6 Log()函数是base-e。我想把这个做成base-2,base-10和base-n。从哪里开始?您可以使用以下数学公式: 在VB中,它类似于: Log10 = Log(X)
Public Function C_Ln(c As ComplexNumber) As ComplexNumber
Set C_Ln = toComplex(Log(C_Abs(c)), Atan2(c.Imag, c.Real))
End Function
VB6 Log()函数是base-e。我想把这个做成base-2,base-10和base-n。从哪里开始?您可以使用以下数学公式: 在VB中,它类似于:
Log10 = Log(X) / Log(10)
Log2 = Log(X) / Log(2)
' ... LogN = Log(X) / Log(N)
您可以使用以下数学公式: 在VB中,它类似于:
Log10 = Log(X) / Log(10)
Log2 = Log(X) / Log(2)
' ... LogN = Log(X) / Log(N)
如果你将自然对数x除以你想要达到的基准对数,你就会得到期望的结果,即(lnx)/(lnn)=y
请参见如果将x的自然对数除以要达到的基准对数,则得到所需的结果,即(lnx)/(lnn)=y
请参见,这对复数仍然有效?抱歉,如果我显得幼稚,那是因为我(w.r.t.复数)可以很好地处理复数,但是复数日志的值是无限的。您的公式只计算主分支,但这可能足够好了。实际上,没有人喜欢无穷值函数。@boost,是的,请参见:(但请注意,一个复数有多个对数)。这对复数仍然有效吗?抱歉,如果我显得幼稚,那是因为我(w.r.t.复数)可以很好地处理复数,但是复数日志的值是无限的。您的公式只计算主分支,但这可能足够好了。实际上,没有人喜欢无穷值函数。@boost,是的,请参阅:(但请注意,复数有多个对数)。