Mathematica が計算を高速化するために自動的に記号和を使用しないのはなぜですか? たとえば、次のコードは実行に非常に時間がかかります。
fr[r_] := PDF[DiscreteUniformDistribution[{1, 10}], r];
Sum[fr[r], {r, 1, 100000000000000000000000000000}]
最後の行を次のように置き換えると、計算は瞬時に行われます。
ReplaceRepeated[Sum[fr[r], {r, 1, n}], n -> 100000000000000000000000000000]
シンボリックな方法で合計を自動的に計算する方法はありますか?