25.12: Difference between revisions
Jump to navigation
Jump to search
Admin moved page Main Page to Verifying DLMF with Maple and Mathematica |
Admin moved page Main Page to Verifying DLMF with Maple and Mathematica |
||
Line 14: | Line 14: | ||
! scope="col" style="position: sticky; top: 0;" | Numeric<br>Mathematica | ! scope="col" style="position: sticky; top: 0;" | Numeric<br>Mathematica | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E2 25.12.E2] | | | [https://dlmf.nist.gov/25.12.E2 25.12.E2] || <math qid="Q7721">\dilog@{z} = -\int_{0}^{z}t^{-1}\ln@{1-t}\diff{t}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\dilog@{z} = -\int_{0}^{z}t^{-1}\ln@{1-t}\diff{t}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>dilog(z) = - int((t)^(- 1)* ln(1 - t), t = 0..z)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[2, z] == - Integrate[(t)^(- 1)* Log[1 - t], {t, 0, z}, GenerateConditions->None]</syntaxhighlight> || Failure || Successful || <div class="toccolours mw-collapsible mw-collapsed">Failed [6 / 7]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: -.8224670339-1.383979491*I | ||
Test Values: {z = 1/2*3^(1/2)+1/2*I}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: 1.644934067-2.503719574*I | Test Values: {z = 1/2*3^(1/2)+1/2*I}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: 1.644934067-2.503719574*I | ||
Test Values: {z = -1/2+1/2*I*3^(1/2)}</syntaxhighlight><br>... skip entries to safe data</div></div> || Successful [Tested: 7] | Test Values: {z = -1/2+1/2*I*3^(1/2)}</syntaxhighlight><br>... skip entries to safe data</div></div> || Successful [Tested: 7] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E3 25.12.E3] | | | [https://dlmf.nist.gov/25.12.E3 25.12.E3] || <math qid="Q7722">\dilog@{z}+\dilog@{\frac{z}{z-1}} = -\frac{1}{2}(\ln@{1-z})^{2}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\dilog@{z}+\dilog@{\frac{z}{z-1}} = -\frac{1}{2}(\ln@{1-z})^{2}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>dilog(z)+ dilog((z)/(z - 1)) = -(1)/(2)*(ln(1 - z))^(2)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[2, z]+ PolyLog[2, Divide[z,z - 1]] == -Divide[1,2]*(Log[1 - z])^(2)</syntaxhighlight> || Failure || Failure || <div class="toccolours mw-collapsible mw-collapsed">Failed [1 / 1]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: 3.289868134-2.177586090*I | ||
Test Values: {z = 1/2}</syntaxhighlight><br></div></div> || Successful [Tested: 1] | Test Values: {z = 1/2}</syntaxhighlight><br></div></div> || Successful [Tested: 1] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E4 25.12.E4] | | | [https://dlmf.nist.gov/25.12.E4 25.12.E4] || <math qid="Q7723">\dilog@{z}+\dilog@{\frac{1}{z}} = -\frac{1}{6}\pi^{2}-\frac{1}{2}(\ln@{-z})^{2}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\dilog@{z}+\dilog@{\frac{1}{z}} = -\frac{1}{6}\pi^{2}-\frac{1}{2}(\ln@{-z})^{2}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>dilog(z)+ dilog((1)/(z)) = -(1)/(6)*(Pi)^(2)-(1)/(2)*(ln(- z))^(2)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[2, z]+ PolyLog[2, Divide[1,z]] == -Divide[1,6]*(Pi)^(2)-Divide[1,2]*(Log[- z])^(2)</syntaxhighlight> || Failure || Failure || <div class="toccolours mw-collapsible mw-collapsed">Failed [1 / 1]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: 6.579736268-4.725198502*I | ||
Test Values: {z = -1/2}</syntaxhighlight><br></div></div> || Successful [Tested: 1] | Test Values: {z = -1/2}</syntaxhighlight><br></div></div> || Successful [Tested: 1] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E5 25.12.E5] | | | [https://dlmf.nist.gov/25.12.E5 25.12.E5] || <math qid="Q7724">\dilog@{z^{m}} = m\sum_{k=0}^{m-1}\dilog@{ze^{2\pi ik/m}}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\dilog@{z^{m}} = m\sum_{k=0}^{m-1}\dilog@{ze^{2\pi ik/m}}</syntaxhighlight> || <math>|z| < 1</math> || <syntaxhighlight lang=mathematica>dilog((z)^(m)) = m*sum(dilog(z*exp(2*Pi*I*k/m)), k = 0..m - 1)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[2, (z)^(m)] == m*Sum[PolyLog[2, z*Exp[2*Pi*I*k/m]], {k, 0, m - 1}, GenerateConditions->None]</syntaxhighlight> || Failure || Failure || <div class="toccolours mw-collapsible mw-collapsed">Failed [1 / 1]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: -8.968925063+0.*I | ||
Test Values: {z = 1/2, m = 3}</syntaxhighlight><br></div></div> || Successful [Tested: 1] | Test Values: {z = 1/2, m = 3}</syntaxhighlight><br></div></div> || Successful [Tested: 1] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E6 25.12.E6] | | | [https://dlmf.nist.gov/25.12.E6 25.12.E6] || <math qid="Q7725">\dilog@{x}+\dilog@{1-x} = \frac{1}{6}\pi^{2}-(\ln@@{x})\ln@{1-x}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\dilog@{x}+\dilog@{1-x} = \frac{1}{6}\pi^{2}-(\ln@@{x})\ln@{1-x}</syntaxhighlight> || <math>0 < x, x < 1</math> || <syntaxhighlight lang=mathematica>dilog(x)+ dilog(1 - x) = (1)/(6)*(Pi)^(2)-(ln(x))*ln(1 - x)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[2, x]+ PolyLog[2, 1 - x] == Divide[1,6]*(Pi)^(2)-(Log[x])*Log[1 - x]</syntaxhighlight> || Successful || Successful || - || Successful [Tested: 1] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E7 25.12.E7] | | | [https://dlmf.nist.gov/25.12.E7 25.12.E7] || <math qid="Q7726">\dilog@{e^{i\theta}} = \sum_{n=1}^{\infty}\frac{\cos@{n\theta}}{n^{2}}+i\sum_{n=1}^{\infty}\frac{\sin@{n\theta}}{n^{2}}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\dilog@{e^{i\theta}} = \sum_{n=1}^{\infty}\frac{\cos@{n\theta}}{n^{2}}+i\sum_{n=1}^{\infty}\frac{\sin@{n\theta}}{n^{2}}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>dilog(exp(I*theta)) = sum((cos(n*theta))/((n)^(2)), n = 1..infinity)+ I*sum((sin(n*theta))/((n)^(2)), n = 1..infinity)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[2, Exp[I*\[Theta]]] == Sum[Divide[Cos[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None]+ I*Sum[Divide[Sin[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None]</syntaxhighlight> || Failure || Successful || Skipped - Because timed out || Successful [Tested: 10] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E8 25.12.E8] | | | [https://dlmf.nist.gov/25.12.E8 25.12.E8] || <math qid="Q7727">\sum_{n=1}^{\infty}\frac{\cos@{n\theta}}{n^{2}} = \frac{\pi^{2}}{6}-\frac{\pi\theta}{2}+\frac{\theta^{2}}{4}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\sum_{n=1}^{\infty}\frac{\cos@{n\theta}}{n^{2}} = \frac{\pi^{2}}{6}-\frac{\pi\theta}{2}+\frac{\theta^{2}}{4}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>sum((cos(n*theta))/((n)^(2)), n = 1..infinity) = ((Pi)^(2))/(6)-(Pi*theta)/(2)+((theta)^(2))/(4)</syntaxhighlight> || <syntaxhighlight lang=mathematica>Sum[Divide[Cos[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None] == Divide[(Pi)^(2),6]-Divide[Pi*\[Theta],2]+Divide[\[Theta]^(2),4]</syntaxhighlight> || Failure || Failure || Skipped - Because timed out || <div class="toccolours mw-collapsible mw-collapsed">Failed [5 / 10]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: Complex[-1.5707963267948957, 2.720699046351327] | ||
Test Values: {Rule[θ, Power[E, Times[Complex[0, Rational[2, 3]], Pi]]]}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: Complex[-2.720699046351327, -1.5707963267948966] | Test Values: {Rule[θ, Power[E, Times[Complex[0, Rational[2, 3]], Pi]]]}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: Complex[-2.720699046351327, -1.5707963267948966] | ||
Test Values: {Rule[θ, Power[E, Times[Complex[0, Rational[-5, 6]], Pi]]]}</syntaxhighlight><br>... skip entries to safe data</div></div> | Test Values: {Rule[θ, Power[E, Times[Complex[0, Rational[-5, 6]], Pi]]]}</syntaxhighlight><br>... skip entries to safe data</div></div> | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E9 25.12.E9] | | | [https://dlmf.nist.gov/25.12.E9 25.12.E9] || <math qid="Q7728">\sum_{n=1}^{\infty}\frac{\sin@{n\theta}}{n^{2}} = -\int_{0}^{\theta}\ln@{2\sin@{\tfrac{1}{2}x}}\diff{x}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\sum_{n=1}^{\infty}\frac{\sin@{n\theta}}{n^{2}} = -\int_{0}^{\theta}\ln@{2\sin@{\tfrac{1}{2}x}}\diff{x}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>sum((sin(n*theta))/((n)^(2)), n = 1..infinity) = - int(ln(2*sin((1)/(2)*x)), x = 0..theta)</syntaxhighlight> || <syntaxhighlight lang=mathematica>Sum[Divide[Sin[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None] == - Integrate[Log[2*Sin[Divide[1,2]*x]], {x, 0, \[Theta]}, GenerateConditions->None]</syntaxhighlight> || Failure || Aborted || Skipped - Because timed out || Skipped - Because timed out | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E10 25.12.E10] | | | [https://dlmf.nist.gov/25.12.E10 25.12.E10] || <math qid="Q7729">\polylog{s}@{z} = \sum_{n=1}^{\infty}\frac{z^{n}}{n^{s}}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\polylog{s}@{z} = \sum_{n=1}^{\infty}\frac{z^{n}}{n^{s}}</syntaxhighlight> || <math></math> || <syntaxhighlight lang=mathematica>polylog(s, z) = sum(((z)^(n))/((n)^(s)), n = 1..infinity)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[s, z] == Sum[Divide[(z)^(n),(n)^(s)], {n, 1, Infinity}, GenerateConditions->None]</syntaxhighlight> || Failure || Successful || <div class="toccolours mw-collapsible mw-collapsed">Failed [12 / 42]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: Float(-infinity)-12.69850170*I | ||
Test Values: {s = -3/2, z = 3/2}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: Float(-infinity)-3.323322953*I | Test Values: {s = -3/2, z = 3/2}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: Float(-infinity)-3.323322953*I | ||
Test Values: {s = -3/2, z = 2}</syntaxhighlight><br>... skip entries to safe data</div></div> || Successful [Tested: 42] | Test Values: {s = -3/2, z = 2}</syntaxhighlight><br>... skip entries to safe data</div></div> || Successful [Tested: 42] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E12 25.12.E12] | | | [https://dlmf.nist.gov/25.12.E12 25.12.E12] || <math qid="Q7731">\polylog{s}@{z} = \EulerGamma@{1-s}\left(\ln@@{\frac{1}{z}}\right)^{s-1}+\sum_{n=0}^{\infty}\Riemannzeta@{s-n}\frac{(\ln@@{z})^{n}}{n!}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\polylog{s}@{z} = \EulerGamma@{1-s}\left(\ln@@{\frac{1}{z}}\right)^{s-1}+\sum_{n=0}^{\infty}\Riemannzeta@{s-n}\frac{(\ln@@{z})^{n}}{n!}</syntaxhighlight> || <math>|\ln@@{z}| < 2\pi, \realpart@@{(1-s)} > 0</math> || <syntaxhighlight lang=mathematica>polylog(s, z) = GAMMA(1 - s)*(ln((1)/(z)))^(s - 1)+ sum(Zeta(s - n)*((ln(z))^(n))/(factorial(n)), n = 0..infinity)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[s, z] == Gamma[1 - s]*(Log[Divide[1,z]])^(s - 1)+ Sum[Zeta[s - n]*Divide[(Log[z])^(n),(n)!], {n, 0, Infinity}, GenerateConditions->None]</syntaxhighlight> || Failure || Failure || Successful [Tested: 7] || Skipped - Because timed out | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12.E13 25.12.E13] | | | [https://dlmf.nist.gov/25.12.E13 25.12.E13] || <math qid="Q7732">\polylog{s}@{e^{2\pi ia}}+e^{\pi is}\polylog{s}@{e^{-2\pi ia}} = \frac{(2\pi)^{s}e^{\pi is/2}}{\EulerGamma@{s}}\Hurwitzzeta@{1-s}{a}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>\polylog{s}@{e^{2\pi ia}}+e^{\pi is}\polylog{s}@{e^{-2\pi ia}} = \frac{(2\pi)^{s}e^{\pi is/2}}{\EulerGamma@{s}}\Hurwitzzeta@{1-s}{a}</syntaxhighlight> || <math>\realpart@@{s} > 0</math> || <syntaxhighlight lang=mathematica>polylog(s, exp(2*Pi*I*a))+ exp(Pi*I*s)*polylog(s, exp(- 2*Pi*I*a)) = ((2*Pi)^(s)* exp(Pi*I*s/2))/(GAMMA(s))*Zeta(0, 1 - s, a)</syntaxhighlight> || <syntaxhighlight lang=mathematica>PolyLog[s, Exp[2*Pi*I*a]]+ Exp[Pi*I*s]*PolyLog[s, Exp[- 2*Pi*I*a]] == Divide[(2*Pi)^(s)* Exp[Pi*I*s/2],Gamma[s]]*HurwitzZeta[1 - s, a]</syntaxhighlight> || Failure || Failure || <div class="toccolours mw-collapsible mw-collapsed">Failed [15 / 18]<div class="mw-collapsible-content"><syntaxhighlight lang=mathematica>Result: 24.27636385+24.27636386*I | ||
Test Values: {a = -3/2, s = 3/2}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: -2.230710143+2.230710142*I | Test Values: {a = -3/2, s = 3/2}</syntaxhighlight><br><syntaxhighlight lang=mathematica>Result: -2.230710143+2.230710142*I | ||
Test Values: {a = -3/2, s = 1/2}</syntaxhighlight><br>... skip entries to safe data</div></div> || Skip - No test values generated | Test Values: {a = -3/2, s = 1/2}</syntaxhighlight><br>... skip entries to safe data</div></div> || Skip - No test values generated | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12#Ex1 25.12#Ex1] | | | [https://dlmf.nist.gov/25.12#Ex1 25.12#Ex1] || <math qid="Q7735">F_{s}(x) = -\polylog{s+1}@{-e^{x}}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>F_{s}(x) = -\polylog{s+1}@{-e^{x}}</syntaxhighlight> || <math>s > -1, \realpart@@{(s+1)} > 0, x < 0, s > 0, x \leq 0</math> || <syntaxhighlight lang=mathematica>((1)/(GAMMA(s + 1))*int(((t)^(s))/(exp(t - x)+ 1), t = 0..infinity)) = - polylog(s + 1, - exp(x))</syntaxhighlight> || <syntaxhighlight lang=mathematica>(Divide[1,Gamma[s + 1]]*Integrate[Divide[(t)^(s),Exp[t - x]+ 1], {t, 0, Infinity}, GenerateConditions->None]) == - PolyLog[s + 1, - Exp[x]]</syntaxhighlight> || Failure || Successful || Error || Successful [Tested: 0] | ||
|- | |- | ||
| [https://dlmf.nist.gov/25.12#Ex2 25.12#Ex2] | | | [https://dlmf.nist.gov/25.12#Ex2 25.12#Ex2] || <math qid="Q7736">G_{s}(x) = \polylog{s+1}@{e^{x}}</math><br><syntaxhighlight lang="tex" style="font-size: 75%;" inline>G_{s}(x) = \polylog{s+1}@{e^{x}}</syntaxhighlight> || <math>s > -1, \realpart@@{(s+1)} > 0, x < 0, s > 0, x \leq 0</math> || <syntaxhighlight lang=mathematica>((1)/(GAMMA(s + 1))*int(((t)^(s))/(exp(t - x)- 1), t = 0..infinity)) = polylog(s + 1, exp(x))</syntaxhighlight> || <syntaxhighlight lang=mathematica>(Divide[1,Gamma[s + 1]]*Integrate[Divide[(t)^(s),Exp[t - x]- 1], {t, 0, Infinity}, GenerateConditions->None]) == PolyLog[s + 1, Exp[x]]</syntaxhighlight> || Failure || Successful || Error || Successful [Tested: 0] | ||
|} | |} | ||
</div> | </div> |
Latest revision as of 12:04, 28 June 2021
DLMF | Formula | Constraints | Maple | Mathematica | Symbolic Maple |
Symbolic Mathematica |
Numeric Maple |
Numeric Mathematica |
---|---|---|---|---|---|---|---|---|
25.12.E2 | \dilog@{z} = -\int_{0}^{z}t^{-1}\ln@{1-t}\diff{t} |
|
dilog(z) = - int((t)^(- 1)* ln(1 - t), t = 0..z)
|
PolyLog[2, z] == - Integrate[(t)^(- 1)* Log[1 - t], {t, 0, z}, GenerateConditions->None]
|
Failure | Successful | Failed [6 / 7] Result: -.8224670339-1.383979491*I
Test Values: {z = 1/2*3^(1/2)+1/2*I}
Result: 1.644934067-2.503719574*I
Test Values: {z = -1/2+1/2*I*3^(1/2)}
... skip entries to safe data |
Successful [Tested: 7] |
25.12.E3 | \dilog@{z}+\dilog@{\frac{z}{z-1}} = -\frac{1}{2}(\ln@{1-z})^{2} |
|
dilog(z)+ dilog((z)/(z - 1)) = -(1)/(2)*(ln(1 - z))^(2)
|
PolyLog[2, z]+ PolyLog[2, Divide[z,z - 1]] == -Divide[1,2]*(Log[1 - z])^(2)
|
Failure | Failure | Failed [1 / 1] Result: 3.289868134-2.177586090*I
Test Values: {z = 1/2}
|
Successful [Tested: 1] |
25.12.E4 | \dilog@{z}+\dilog@{\frac{1}{z}} = -\frac{1}{6}\pi^{2}-\frac{1}{2}(\ln@{-z})^{2} |
|
dilog(z)+ dilog((1)/(z)) = -(1)/(6)*(Pi)^(2)-(1)/(2)*(ln(- z))^(2)
|
PolyLog[2, z]+ PolyLog[2, Divide[1,z]] == -Divide[1,6]*(Pi)^(2)-Divide[1,2]*(Log[- z])^(2)
|
Failure | Failure | Failed [1 / 1] Result: 6.579736268-4.725198502*I
Test Values: {z = -1/2}
|
Successful [Tested: 1] |
25.12.E5 | \dilog@{z^{m}} = m\sum_{k=0}^{m-1}\dilog@{ze^{2\pi ik/m}} |
dilog((z)^(m)) = m*sum(dilog(z*exp(2*Pi*I*k/m)), k = 0..m - 1)
|
PolyLog[2, (z)^(m)] == m*Sum[PolyLog[2, z*Exp[2*Pi*I*k/m]], {k, 0, m - 1}, GenerateConditions->None]
|
Failure | Failure | Failed [1 / 1] Result: -8.968925063+0.*I
Test Values: {z = 1/2, m = 3}
|
Successful [Tested: 1] | |
25.12.E6 | \dilog@{x}+\dilog@{1-x} = \frac{1}{6}\pi^{2}-(\ln@@{x})\ln@{1-x} |
dilog(x)+ dilog(1 - x) = (1)/(6)*(Pi)^(2)-(ln(x))*ln(1 - x)
|
PolyLog[2, x]+ PolyLog[2, 1 - x] == Divide[1,6]*(Pi)^(2)-(Log[x])*Log[1 - x]
|
Successful | Successful | - | Successful [Tested: 1] | |
25.12.E7 | \dilog@{e^{i\theta}} = \sum_{n=1}^{\infty}\frac{\cos@{n\theta}}{n^{2}}+i\sum_{n=1}^{\infty}\frac{\sin@{n\theta}}{n^{2}} |
|
dilog(exp(I*theta)) = sum((cos(n*theta))/((n)^(2)), n = 1..infinity)+ I*sum((sin(n*theta))/((n)^(2)), n = 1..infinity)
|
PolyLog[2, Exp[I*\[Theta]]] == Sum[Divide[Cos[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None]+ I*Sum[Divide[Sin[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None]
|
Failure | Successful | Skipped - Because timed out | Successful [Tested: 10] |
25.12.E8 | \sum_{n=1}^{\infty}\frac{\cos@{n\theta}}{n^{2}} = \frac{\pi^{2}}{6}-\frac{\pi\theta}{2}+\frac{\theta^{2}}{4} |
|
sum((cos(n*theta))/((n)^(2)), n = 1..infinity) = ((Pi)^(2))/(6)-(Pi*theta)/(2)+((theta)^(2))/(4)
|
Sum[Divide[Cos[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None] == Divide[(Pi)^(2),6]-Divide[Pi*\[Theta],2]+Divide[\[Theta]^(2),4]
|
Failure | Failure | Skipped - Because timed out | Failed [5 / 10]
Result: Complex[-1.5707963267948957, 2.720699046351327]
Test Values: {Rule[θ, Power[E, Times[Complex[0, Rational[2, 3]], Pi]]]}
Result: Complex[-2.720699046351327, -1.5707963267948966]
Test Values: {Rule[θ, Power[E, Times[Complex[0, Rational[-5, 6]], Pi]]]}
... skip entries to safe data |
25.12.E9 | \sum_{n=1}^{\infty}\frac{\sin@{n\theta}}{n^{2}} = -\int_{0}^{\theta}\ln@{2\sin@{\tfrac{1}{2}x}}\diff{x} |
|
sum((sin(n*theta))/((n)^(2)), n = 1..infinity) = - int(ln(2*sin((1)/(2)*x)), x = 0..theta)
|
Sum[Divide[Sin[n*\[Theta]],(n)^(2)], {n, 1, Infinity}, GenerateConditions->None] == - Integrate[Log[2*Sin[Divide[1,2]*x]], {x, 0, \[Theta]}, GenerateConditions->None]
|
Failure | Aborted | Skipped - Because timed out | Skipped - Because timed out |
25.12.E10 | \polylog{s}@{z} = \sum_{n=1}^{\infty}\frac{z^{n}}{n^{s}} |
|
polylog(s, z) = sum(((z)^(n))/((n)^(s)), n = 1..infinity)
|
PolyLog[s, z] == Sum[Divide[(z)^(n),(n)^(s)], {n, 1, Infinity}, GenerateConditions->None]
|
Failure | Successful | Failed [12 / 42] Result: Float(-infinity)-12.69850170*I
Test Values: {s = -3/2, z = 3/2}
Result: Float(-infinity)-3.323322953*I
Test Values: {s = -3/2, z = 2}
... skip entries to safe data |
Successful [Tested: 42] |
25.12.E12 | \polylog{s}@{z} = \EulerGamma@{1-s}\left(\ln@@{\frac{1}{z}}\right)^{s-1}+\sum_{n=0}^{\infty}\Riemannzeta@{s-n}\frac{(\ln@@{z})^{n}}{n!} |
polylog(s, z) = GAMMA(1 - s)*(ln((1)/(z)))^(s - 1)+ sum(Zeta(s - n)*((ln(z))^(n))/(factorial(n)), n = 0..infinity)
|
PolyLog[s, z] == Gamma[1 - s]*(Log[Divide[1,z]])^(s - 1)+ Sum[Zeta[s - n]*Divide[(Log[z])^(n),(n)!], {n, 0, Infinity}, GenerateConditions->None]
|
Failure | Failure | Successful [Tested: 7] | Skipped - Because timed out | |
25.12.E13 | \polylog{s}@{e^{2\pi ia}}+e^{\pi is}\polylog{s}@{e^{-2\pi ia}} = \frac{(2\pi)^{s}e^{\pi is/2}}{\EulerGamma@{s}}\Hurwitzzeta@{1-s}{a} |
polylog(s, exp(2*Pi*I*a))+ exp(Pi*I*s)*polylog(s, exp(- 2*Pi*I*a)) = ((2*Pi)^(s)* exp(Pi*I*s/2))/(GAMMA(s))*Zeta(0, 1 - s, a)
|
PolyLog[s, Exp[2*Pi*I*a]]+ Exp[Pi*I*s]*PolyLog[s, Exp[- 2*Pi*I*a]] == Divide[(2*Pi)^(s)* Exp[Pi*I*s/2],Gamma[s]]*HurwitzZeta[1 - s, a]
|
Failure | Failure | Failed [15 / 18] Result: 24.27636385+24.27636386*I
Test Values: {a = -3/2, s = 3/2}
Result: -2.230710143+2.230710142*I
Test Values: {a = -3/2, s = 1/2}
... skip entries to safe data |
Skip - No test values generated | |
25.12#Ex1 | F_{s}(x) = -\polylog{s+1}@{-e^{x}} |
((1)/(GAMMA(s + 1))*int(((t)^(s))/(exp(t - x)+ 1), t = 0..infinity)) = - polylog(s + 1, - exp(x))
|
(Divide[1,Gamma[s + 1]]*Integrate[Divide[(t)^(s),Exp[t - x]+ 1], {t, 0, Infinity}, GenerateConditions->None]) == - PolyLog[s + 1, - Exp[x]]
|
Failure | Successful | Error | Successful [Tested: 0] | |
25.12#Ex2 | G_{s}(x) = \polylog{s+1}@{e^{x}} |
((1)/(GAMMA(s + 1))*int(((t)^(s))/(exp(t - x)- 1), t = 0..infinity)) = polylog(s + 1, exp(x))
|
(Divide[1,Gamma[s + 1]]*Integrate[Divide[(t)^(s),Exp[t - x]- 1], {t, 0, Infinity}, GenerateConditions->None]) == PolyLog[s + 1, Exp[x]]
|
Failure | Successful | Error | Successful [Tested: 0] |