如何使用Mathematica在一个平面上绘制x函数和y函数？

Question

我有两个功能：

y = x - x^3，并 x = y^3 - y 我需要在一个平面上绘制它们，我想知道如何用Mathematica实现这个目标？

由于

Answer 1

一种方法是使用ContourPlot

让它在Manipulate中包装以使其更容易调整

 Manipulate[

 With[{f1 = y == x - x^3, f2 = x == y^3 - y},
  ContourPlot[{f1, f2}, {x, -lim, lim}, {y, -lim, lim},
   Frame -> True,
   FrameLabel -> {{y, None}, {x, {f1, f2}}},
   ImagePadding -> 30,
   GridLines -> Automatic,
   GridLinesStyle -> Directive[Thickness[.001], LightGray]]
  ],

 {{lim, 3, "limit"}, .1, 10, .1, Appearance -> "Labeled"}
 ]