Hello All.
I am trying to plot a 3D graph for which I have written code. But I am not getting the output. The code is attached below. Can anyone help me get the plot?
Thanks
Sir, Code is working and showing no errors but the plot is blanck with no output
You can do away with Show and Evaluate, but the code works fine for me:
Show
Evaluate
Plot3D[Abs[F2[r][\[Xi]]], {r, -1, 1}, {\[Xi], 0, 5}, PlotRange -> All]