参数绘图中图形转动

Question

{w1 = 45.6/800, w2 = 45.6/400, \[Alpha] = Pi/4, \[Beta] = Pi/4, 
  f1 = 0.075, f2 = 0.075};

ParametricPlot[{Sqrt[f1] Cos[w1 t] Sin[\[Alpha]] + 
   Sqrt[f2] Cos[\[Beta]] Cos[w2 t], -Sqrt[f1] Cos[\[Alpha]] Sin[
     w1 t] + Sqrt[f2] Sin[\[Beta]] Sin[w2 t]}, {t, 0, 37 Pi}, 
 PlotRange -> {{-1, 1}, {-1, 1}}, Frame -> True, 
 FrameTicks -> {{-1, 0, 1}, {-1, 0, 1}}, 
 FrameLabel -> {"\!\(\*SubscriptBox[\(E\), \(x\)]\)(t)", 
   "\!\(\*SubscriptBox[\(E\), \(y\)]\)(t)"}]

第一幅和第二幅，存在一个转动角度，请问该怎么调整？

Comments

没能理解你的问题

---

我想要把左边的图调整一下，变成右边这样，我观察他们之间差一个旋转角度，我始终调整不过去。

Answer 1

用旋转变换吧，简单些：

{w1 = 45.6/800, w2 = 45.6/400, \[Alpha] = Pi/4, \[Beta] = Pi/4, 
  f1 = 0.075, f2 = 0.075};

rotation = -Pi/10;(*旋转角度*)
ParametricPlot[
 Evaluate[(TransformationMatrix[
      RotationTransform[rotation]].{Sqrt[f1] Cos[w1 t] Sin[\[Alpha]] +
        Sqrt[f2] Cos[\[Beta]] Cos[w2 t], -Sqrt[f1] Cos[\[Alpha]] Sin[
         w1 t] + Sqrt[f2] Sin[\[Beta]] Sin[w2 t], 1})[[;; 2]]], {t, 0,
   37 Pi}, PlotRange -> {{-1, 1}, {-1, 1}}, Frame -> True, 
 FrameTicks -> {{-1, 0, 1}, {-1, 0, 1}}, 
 FrameLabel -> {"\!\(\*SubscriptBox[\(E\), \(x\)]\)(t)", 
   "\!\(\*SubscriptBox[\(E\), \(y\)]\)(t)"}]