wolfram-mathematica - 数组运算在 Mathematica 中不起作用

Question

我正在尝试在 Mathematica 9.0 中执行计算。它使用 NSum 并且当我使用单个值 't' 时工作得很好。问题是我想计算一个't'数组。所以我简单地改为t = 0.3例如t = {0.3, 0.4}。它现在不会评估原因Summand *my equation* is not numerical at point k = 0。

不过，我不太明白为什么，因为如果我尝试单独的值0.3或值，它将起作用0.4。但我想对一组值进行处理。

我的功能是

NSum[(-1)^k/k!*(t/0.6)^(0.6*k + 1), {k, 0, 5000},WorkingPrecision -> 10, NSumTerms -> 5000]

任何帮助，将不胜感激。

谢谢

Answer 1

您可以使用Table：-

Table[NSum[(-1)^k/k!*(t/0.6)^(0.6*k + 1), {k, 0, 5000}, 
  WorkingPrecision -> 10, NSumTerms -> 5000], {t, {0.3, 0.4}}]

{0.26, 0.30}

Answer 2

其他方式..

t={.3, .4}
Function[t, 
      NSum[(-1)^k/k!*(t/0.6)^(0.6*k + 1), {k, 0, 5000}, 
      WorkingPrecision -> 10, NSumTerms -> 5000], {Listable}][t]


{0.26, 0.30}

无论 t 是列表还是单个值，这具有工作相同的优点。