大きい数を含む計算とWolfram AlphaとMathematica、Wolfram Engine
あと,他のwolframalpha対策としては,クソデカ数(ここでは五兆)を使うと,計算自体を諦めてくれます!✨ pic.twitter.com/Yoyo3Vr5FP
— るめなる (@Re_menal2) September 29, 2020
あと,他のクソデカ数対策としては,クソデカ数の代わりに文字(ここではn)を使うと,計算してくれます!✨ https://t.co/ToHCqlGuX1 pic.twitter.com/GEZwfvXg8M
— pepper (@pepper_aobuta) September 29, 2020
ちなみにこれの答えは,ln(10兆1)です! https://t.co/SgTX3mlp6S
— るめなる (@Re_menal2) September 29, 2020
本当だ!計算してくれている!(答えはださない)
— るめなる (@Re_menal2) September 29, 2020
Wolfram AlphaではなくWolfram Engineで、ローカルではどうなるのか気になったから試してみた。
コード(Wolfram Language)
Integrate[(x^(5 10^12) - 1) / (Sqrt[x] Log[x]), {x, 0, 1}]
PolynomialGCD::lrgexp: Exponent is out of bounds for function PolynomialGCD.
PolynomialGCD::lrgexp: Exponent is out of bounds for function PolynomialGCD.
PolynomialGCD::lrgexp: Exponent is out of bounds for function PolynomialGCD.
Further output of `1` will be suppressed during this calculation.: Further output of PolynomialGCD::lrgexp will be suppressed during this calculation.
f[n_] := Integrate[(x^n-1) / (Sqrt[x] Log[x]), {x, 0, 1}]
f[n]
f[5 10^12]
PolynomialGCD::lrgexp: Exponent is out of bounds for function PolynomialGCD.
PolynomialGCD::lrgexp: Exponent is out of bounds for function PolynomialGCD.
PolynomialGCD::lrgexp: Exponent is out of bounds for function PolynomialGCD.
Further output of `1` will be suppressed during this calculation.: Further output of PolynomialGCD::lrgexp will be suppressed during this calculation.
Simplify[f[n], Element[n, PositiveIntegers]] // TraditionalForm
ということで、多少時間はかかるものの、計算できた。るめなるさん(@Re_menal2)log(10000000000001)、log(10兆1)と一致。また、pepperさん(@pepper_aobuta)の文字を使う場合について、その条件も表示してくれた。さらに、nを正の整数と指定すれば(Element[n, PositiveIntegers])、Log(2n + 1)という結果も表示してくれた。