Mathematic是一种不按照所需表达式工作的代码

我没有做到下面的表达，并使其给出准确的结果，如果有人能帮助我，我将感到高兴。我在一张图片上附上了我的表情“想要这个”，我的审判是“我的审判”。当a=1、b=10、m=3、n=6时，正确答案必须等于0.119。先谢谢你

a = 1
b = 10
m = 3
n = 6
a^1 b^n (Sum[
Sum[Sum[Sum[(-1)^(k + v - n + m + 1)
     If[k == 0, 1, 
     SeriesCoefficient[Series[(-Log[1 - x])^k, {x, 0, 30}], 
      p + k]] If[n - k - 2 == 0, 1, 
     SeriesCoefficient[
      Series[(-Log[1 - x])^(n - k - 2), {x, 0, 30}], 
      q + (n - k - 2)]]
    Binomial[n - m - 1, k] Binomial[b - 1, 
     v] (-PolyGamma[0, -1 + 1/a - k + n + q] + 
       PolyGamma[0, 2/a + n + p + q + v])/(a (1 + k + p + v) + 
       1), {q, 0, 30 - (n - k - 2)}], {p, 0, 30 - k}], {v, 0, 
  b - 1}], {k, 0, n - m - 1}])/((m - 1)! (n - m - 1)!)

---

我找到了解决这个问题的办法。问题是，当k的值为0时，系数将不等于1，但必须从k的值开始找到整个表达式，k的值将从1开始，当k的值为0时，必须找到一个表达式。然而，我没能用MATHEMATICA来解决这个问题，但通过做上述工作，我成功地得到了正确的结果。感谢各位宝贵的时间和意见。

您的问题中没有提供具体的问题。此外，这是一连串的单字母变量，我认为它是不可读的。要调试它并找出问题所在，我建议您的第一步是清理它，使用更多描述性变量名，并进行分解，这样您就不会只有一个大表达式。问题不在于单字母变量，这在数学上下文中是可以的。但是，如果您尝试格式化代码（使用语言中常见的缩进规则），您/我们将更轻松地阅读代码。包括图像也会有所帮助。我不懂这种语言，但至少有一个拼写错误，还有两点我会进一步检查。打字错误：你有“a^1”，而笔记上有“a^2”。我会仔细检查p（30-k）和q（30-（n-k-2））的总和极限是否等于无穷大。你能明确地说“无限”吗。或者尝试一个固定的“巨大”限制？@Bill，匹配]在“{q，0，30-（n-k-2）}]”（总和限制），我想（在emacs的帮助下）请每个人按“在这里输入图像描述”来查看原始问题>，对于无穷大，你可以看到30后表达式的结果几乎相同。请每个人按一下“在此处输入图像描述”查看原始问题。对于无穷大，您可以看到表达式在30后的结果几乎相同。此外，分母中有一个a与分子中的2个a中的一个相匹配。感谢大家的观察，我需要更多。