Message Boards Message Boards

GROUPS:

Get a smooth line in Spherical 3D plot?

Posted 4 months ago
531 Views
|
2 Replies
|
2 Total Likes
|

Can any one please help me to get a smooth line in Spherical 3D plot. I tried to get the minima of the Log of a function which is as a ring in the 3D plot, but my problem is how to make this ring smoother.

I have attached my code.

Thanks.

Attachments:
2 Replies
c = SphericalPlot3D[1, {u, 0, Pi}, {v, 0.0, 2.0 Pi}, Mesh -> None, 
  TextureCoordinateFunction -> ({#5, 3 - #4} &), 
  PlotStyle -> Directive[Texture[p]], Lighting -> "Neutral", 
  SphericalRegion -> False, 
  PlotLabel -> Row[{"Energy = ", Energy , " eV"}], 
  ViewPoint -> {-12.0, -2.0 , -11}, ViewRange -> All, 
  ViewVector -> Automatic, ViewVertical -> {1, -20, 0.5}, 
  PlotLegends -> Automatic, 
  BaseStyle -> {FontWeight -> Bold, FontSize -> 13}, PlotPoints -> 50]

fig1

Posted 4 months ago

Thank you so much Mr.Alexander!

If you can please I need you to explain something to me in this code. Actually, in this code I followed the instructions, but I noticed there are some numbers in degree in the loop that is using to create the function {diffcrosslog}. I know that in Mathematica the angles should be in radian. Do you think that is for the interpolation function?

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

Group Abstract Group Abstract