2
$\begingroup$

Found the animation of this graph (without code) and its functionFunctionGraph

And I just need a graph, not an animation. How to do it? It's just "Plot" or what? I mean, I'm confused, because I don't know what to do with i

$\endgroup$
1
  • 4
    $\begingroup$ The community expects the following from you: ✅: A clear description of an on-topic problem or goal. ❌: A minimal working Wolfram Language code example, formatted, easy to copy&paste, in Raw InputForm. ❌. An example of what you expect as output. ❌. Some proof of minimal Mathematica knowledge. ❌. Minimum due diligence: Share how you have searched the site and documentation, your attempts and reasons to believe an answer exists. $\endgroup$
    – rhermans
    Aug 8 at 16:55

1 Answer 1

7
$\begingroup$

Under the working assumption that $\phi$ is a real variable from 0 to 2 $\pi$, one way to go about it is the following:

func[f_] := (Exp[I f] Sqrt[I Cos[2 f] + Sqrt[Sin[2 f]^2]])/(
 Exp[I/2] + Sqrt[2] (I Cos[2 f] + Sqrt[Sin[2 f]^2])^(3/2))

ListPlot[Table[ReIm@func@f, {f, 0, 2 Pi, .01}], Joined -> True]

Many thanks to @Bob Hanlon for the following suggestion:

ParametricPlot[ReIm@func@f, {f, 0, 2 Pi}, PlotPoints -> 100]

plot

$\endgroup$
2
  • 4
    $\begingroup$ +1 Also ParametricPlot[ReIm@func@f, {f, 0, 2 Pi}, PlotPoints -> 100] $\endgroup$
    – Bob Hanlon
    Aug 8 at 18:12
  • 1
    $\begingroup$ @BobHanlon excellent recommendation. Many thanks! $\endgroup$
    – bmf
    Aug 8 at 18:26

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.