wolfram-mathematica - Fair-Whipple-Hsiao Q calculation

Question

This Equation:

J = 0,0008695  * (Q ^ 1,75 / D ^ 4,75)

Gives J for Fair-Whipple-Hsiao.

How to calculate Q using Wolfram Mathematica ?

Answer 1

我假设您想用 J 和 D 来求解 Q。首先，我建议使用小写字母来开始变量名称，因为 Mathematica 的所有函数都以大写字母开头，而 D 是标准的名称功能。您可以使用以下内容：

 Solve[j == (8695/10000000) (q^(175/100)/d^(475/100)), q]

请注意，我已经对所有数字进行了合理化以避免潜在的舍入错误。这导致

 {{q -> (2000 5^(3/7) (d^(19/4) j)^(4/7))/1739^(4/7)}}