Question

Mathematica 如何在一个坐标轴内画多张图？

我想在一个坐标轴内画这三个图，但是总有两个图不完整，求大神帮忙！

e = ParametricPlot[{0.5 Cos[t], 0.5 Sin[t] + 1}, {t, 0, 2 Pi}];
r = ParametricPlot[{1 Cos[t], 1 Sin[t] + 2}, {t, 0, 2 Pi}];
c = ParametricPlot[{1.5 Cos[t], 1.5 Sin[t] + 3}, {t, 0, 2 Pi}];
Show[r, e, c]

Answer 1

In[1]:=ParametricPlot[{{1.5 Cos[t], 1.5 Sin[t] + 3}, {1 Cos[t], 
   1 Sin[t] + 2}, {0.5 Cos[t], 0.5 Sin[t] + 1}}, {t, 0, 2 Pi}]

如有用，请及时采纳！