TransWikia.com

Help me simplify this expression

Mathematica Asked by Shivam K on December 6, 2020

I am unable to simplify this expression, help me in this regard, thanks in advance.
I tried this : Normal//ToRadicals//FullSimplify

5 - RootSum[
  5 + 6 #1^2 + 6 #1^3 &, (
   5 Log[1 - #1] - 5 Log[1 - #1] #1 + 11 Log[1 - #1] #1^2)/(
   2 #1 + 3 #1^2) &] + 
 RootSum[5 + 6 #1^2 + 6 #1^3 &, (
   5 Log[-#1] - 5 Log[-#1] #1 + 11 Log[-#1] #1^2)/(2 #1 + 3 #1^2) &]

One Answer

ComplexExpand[Re[ToRadicals[expr]],TargetFunctions -> {Re, Im}] // Simplify 

Imaginary part proves to be zero this way.

Answered by Akku14 on December 6, 2020

Add your own answers!

Ask a Question

Get help from others!

© 2024 TransWikia.com. All rights reserved. Sites we Love: PCI Database, UKBizDB, Menu Kuliner, Sharing RPP