Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- RevolutionPlot3D[
- -1 - x^2 - y^2 - 1 - (1 + x^2 + y^2 + 1) (1 - 1/(x^2 + y^2 + 1)),
- {x, -1, 1}, {y, -π/4, π/4},
- Boxed -> False,
- Axes -> False,
- Ticks -> None,
- PlotStyle -> Opacity[.1],
- ImageSize -> {600, 600},
- Mesh -> 20]
Add Comment
Please, Sign In to add comment
