User Portlet User Portlet

Discussions
Have you considered transforming the iterated integrals into a double integral? You gave two different spellings to `var`. Choose one.
I took a symbolic look at the three functions to be integrated. The first two are identical. The third is not identical, but it differs from the others by an odd function, whose integral between `-30` and `30` vanishes. Is this just a test for...
If I bring the first term of `expr1` out of `Re`, `Reduce` confirms your equality: Reduce[-((139 \[Pi]^2)/180) + Re[+8 Log[1/2 + Sqrt[5]/2]^2 - 3 PolyLog[2, -((-1 + Sqrt[5])/2 )^4] + 16 PolyLog[2, ((-1 +...
Wonderful, but why cannot I find it mentioned in the documentation for `Extension`?
One very generic advice for symbolic integration is to use `Integrate` with exact input only. You gave it floating-point parameters, and it may have helped choose the wrong path. Or it may not; only an insider can tell.
Have you tried Hold[Plot[Sin[x], {x, 0, Pi}]]
Also, you can draw a plane in 3D with the primitive `InfinitePlane` inside `Graphics3D`. No need to a separate `Plot3D`.
No problems here with `CommunityGraphPlot` on 14.2 and macOS.
The main tool for this is `ComplexExpand`.
Your `computeEntropy` function gives complex outputs. This way the condition `Abs[Snew - Sold]/Snew