Stats
1,554
reputation
11k
reached
4
answers
45
questions
Loading…
Communities
About
Hi! I'm a newbie, still figuring out my way through Mathematica.
ContourPlot3D[(-1/20) x^2 z^3 - y^2 z^3 + 1/1.5*(2 x^2 + y^2 + z^2 - 1)^3 == 0,{x, -1.7, 1.7}, {y, -1.7, 1.7}, {z, -1.7, 1.7}, PlotPoints -> 100, Axes -> False,Boxed -> False, Ticks -> None,ContourStyle -> Directive[Opacity[0.9], Red],Background -> GrayLevel[.1], Mesh -> None]
Badges
View all badges
1
gold badge
-
FanaticAug 9
4
silver badges
-
TaxonomistMay 5
-
Civic DutyOct 21, 2022
-
EnthusiastJan 8, 2023
23
bronze badges
-
Vox PopuliOct 22, 2022
-
CleanupJul 17
-
SuffrageSep 8, 2022
Top tags
View all tags
7
Score
25
Posts
51
Posts %
3
Score
9
Posts
18
Posts %
3
Score
6
Posts
12
Posts %
2
Score
9
Posts
18
Posts %
1
Score
5
Posts
10
Posts %
0
Score
7
Posts
14
Posts %