Wolfram mathematica Mathematica积分返回被积函数

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

(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    

关于如何正确执行此计算有何建议？

---

提前感谢

您可以分解此积分：

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]

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

您可以用数值方式进行这些积分，或者搜索近似形式，例如使用级数展开

您可以在以下链接中找到示例性系列扩展：

---

math.stackexchange.com此问题似乎与主题无关，因为它是关于数学的问题。我是否可以将问题转发到那里？您应该将问题发布到。