-1

我正在尝试集成以下功能:

(q (1 + q) - E^-q Sinh[q])/(-q + Cosh[q] Sinh[q]) - (
 2 q Tanh[q])/(-q + Cosh[q] Sinh[q])    

我已经用数字解决了它,但我真的需要这样使用的不定积分:

 In[67]:= Integrate[(
  q (1 + q) - E^-q Sinh[q])/(-q + Cosh[q] Sinh[q]) - (
  2 q Tanh[q])/(-q + Cosh[q] Sinh[q]), q]

但作为输出,我再次取回被积函数:

 Out[67]= \[Integral]((
     q (1 + q) - E^-q Sinh[q])/(-q + Cosh[q] Sinh[q]) - (
     2 q Tanh[q])/(-q + Cosh[q] Sinh[q])) \[DifferentialD]q    

有关如何正确执行此计算的任何建议?提前致谢

4

1 回答 1

1

你可以分解这个积分:

eq = (q (1 + q) - E^-q Sinh[q])/(-q + 
  Cosh[q] Sinh[q]) - (2 q Tanh[q])/(-q + Cosh[q] Sinh[q]);
Integrate[#, q] & /@ Simplify /@ Expand[eq]

这个积分的一部分可以做,其余的包含最简单的,但仍然没有用标准数学函数表示的积分。

在此处输入图像描述

您可以对这些积分进行数值计算,或搜索近似形式,例如使用级数展开。

您可以在链接上找到示例系列扩展: wolframalpha.com

于 2016-06-07T10:16:49.123 回答