Group Abstract Group Abstract

Message Boards Message Boards

0
|
4.5K Views
|
2 Replies
|
3 Total Likes
View groups...
Share
Share this post:

How to display all complex solutions of an expression

Posted 10 years ago
POSTED BY: Edoardo Ottoni
2 Replies
In[2]:= Solve[x^3 == 1, x] // ComplexExpand

Out[2]= {{x -> 
   1}, {x -> -(1/2) - (I Sqrt[3])/2}, {x -> -(1/2) + (I Sqrt[3])/2}}
POSTED BY: Frank Kampas

If you really insist on that form of output, here is a hack using obscure typesetting commands:

HoldForm[DisplayForm@RadicalBox[1, 3]] == 
 DisplayForm@
  Cell[BoxData[
    RowBox[{"{", 
      Grid[{z} /. ComplexExpand[Solve[z^3 == 1, z]], 
       Alignment -> Left]}]], SpanMaxSize -> Infinity]

I wonder if it can be done more easily...

I would like to insert a TraditionalForm, but anybody knows where?

POSTED BY: Gianluca Gorni
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.
Reply Preview
Attachments
Remove
or Discard