如何让PlotLegend在Mathematica中使用ParametricPlot？

Question

我似乎无法将PlotLegend与ParametricPlot一起使用。这是我试过的：

ParametricPlot[{Sin[t], Cos[Sqrt[t]]}, {t, 0, 2 Pi}, 
 PlotLegend -> {"My Plot"}] 

Answer 1

如果您先调用PlotLegends软件包，它应该可以正常工作，尽管您可能更好地使用ShowLegends版本而不是PlotLegend选项，以获得更多控制权：

Needs["PlotLegends`"]

ParametricPlot[{Sin[t], Cos[Sqrt[t]]}, {t, 0, 2 Pi}, 
 PlotLegend -> {"My Plot"}]

ShowLegend[
 ParametricPlot[{Sin[t], Cos[Sqrt[t]]}, {t, 0, 
   2 Pi}], {{{Graphics[{Blue, Disk[{0, 0}, 1]}], {Sin[t], 
     Cos[Sqrt[t]]}}}}]