Superellipse: Difference between revisions
m
→{{header|Mathematica}}
m (update for v1.0+) |
|||
Line 784:
<lang maple>plots:-implicitplot(abs((1/200)*x^2.5)+abs((1/200)*y^2.5) = 1, x = -10 .. 10, y = -10 .. 10);</lang>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
The built-in function ContourPlot accepts and equation in 2 variables and creates the desired plot
▲ Abs[x/200]^2.5 + Abs[y/200]^2.5 == 1, {x, -200, 200}, {y, -200, 200}]</lang>
=={{header|Nim}}==
| |||