How can I solve next problem? I have a curve and area which I need to rotate around x axis to make a sphere. Can it be like an animation? So far I made a half of sphere, and a whole sphere, bit I don't know how to animate it?
Asked
Active
Viewed 436 times
0
J. M.'s missing motivation
- 124,525
- 11
- 401
- 574
Danica
- 3
- 1
-
2Welcome to Mma.SE! Please post code as text instead of a screenshot; it makes it a lot easier us to try it out. – kirma Jan 20 '19 at 16:11
-
1If you want an animation of this you probably need to be a bit more specific regarding your expected result. – kirma Jan 20 '19 at 16:13
-
Possible duplicate: https://mathematica.stackexchange.com/questions/8461/revolutionplot3d-but-not-revolving-about-the-z-axis, https://mathematica.stackexchange.com/questions/135358/area-of-surface-of-revolution – Michael E2 Jan 20 '19 at 16:22
-
Possible duplicate of RevolutionPlot3D: but NOT revolving about the z axis – Yves Klett Jan 24 '19 at 08:14
-
Somehow I found this few days ago, it halped. Tnak you for your concern. Tnx for solutions. :) – Danica Jan 24 '19 at 22:11
2 Answers
4
RevolutionPlot3D[Sqrt[4 - x^2], {x, -3, 3},
RevolutionAxis -> "X", BoxRatios -> {1, 1, 1}]
m_goldberg
- 107,779
- 16
- 103
- 257
1
I'm not entirely certain if this is a particularly useful approach to the problem hidden behind your question, but this should help while maintaining the form:
RevolutionPlot3D[Sign[x] Sqrt[4 - x^2], {x, -2, 2},
BoxRatios -> {1, 1, 1}]
kirma
- 19,056
- 1
- 51
- 93
-
Ok, sorry for less informations and no code. Somehow I got this far, bit i need to turn next thing in the sphere you made for me using some animation or parameter...here's the code: Plot[Sqrt[4 - x^2], {x, -2, 2}, Filling -> Axis, PlotRange -> {{-3, 3}, {-1, 3}}] – Danica Jan 20 '19 at 18:01