The task is to visualize the real and imaginary part. Here is how i tried it what has to be different? Besides i need the derivatives it didn’t work like that. See attached.
Here the solution:
Grid[
Partition[Table[
Plot[
Evaluate[{
Re[D[Hypergeometric0F1[1,(I*Pi*x/2)*Exp[I* 2\[Pi] x]],{x,i}]],
Im[D[Hypergeometric0F1[1,(I*Pi*x/2)*Exp[I* 2\[Pi] x]],{x,i}]]}],
{x,-2\[Pi],2\[Pi]},
PlotRange->{-70,70},
Frame->True,
GridLines->Automatic,
AspectRatio->1,
FrameLabel->{"x",StringForm["Text[Hypergeometric0F1[1, ((Complex[0, Rational[1, 2]] E^((Complex[0, 2] Pi) x)) Pi) x]]",i]},
PlotLegends->Placed[{"Re","Im"},{Center,Top}],
ImageSize->300],
{i,0,3}],2],Frame->True]
Thank you. Could you explain to me what’s wrong about my version?
@Azad Kaygun, welcome to Wolfram Community! Please make sure you know the rules: https://wolfr.am/READ-1ST
Your posts and notebooks are badly formatted, please make sure you follow the rules above and format posts properly.
If you copy code to text editor you see this:
Hypergeometric0F1][1, \[InvisiblePrefixScriptBase][\[ImaginaryJ] \
\[Pi]/2 x]\[CenterDot]E^(\[ImaginaryJ] 2 \[Pi] x)]
And should be:
Hypergeometric0F1[1, (I \[Pi]/2 x)*E^(2 I \[Pi] x)]
You have made other syntax mistakes.
Have a nice day ![]()
